dhcp scope range parsing

cls
$file = Get-Content "show_iprange.txt" | Out-String

#$regexStr = "Options for Scope (\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}):\r\n\r\n\tDHCP Standard Options :\r\n\tGeneral Option Values:\r\n\t(OptionId : (\d+) \r\n\tOption Value: \r\n\t\tNumber of Option Elements = \d+\r\t\tOption Element Type = \w\r\n\t\tOption Element Value = ([\r\n]+)\r\n)+"
$regexStr = "Changed the current scope context to (\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}) scope.[\r\n]+([^\r\n]+\r\n){3} +(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}) +- +(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}) +- +DHCP ONLY\r\n"
$regex = [regex]::Matches($file, $regexStr, [System.Text.RegularExpressions.RegexOptions]::Multiline -bor [System.Text.RegularExpressions.RegexOptions]::IgnoreCase)

$objArr = @()

$regex | foreach {
    $ScopeName = $_.Groups[1].Value

    $StartRange = $_.Groups[3].Value
    $EndRange = $_.Groups[4].Value

    $obj = New-Object System.Object
    $obj | Add-Member -Name "ScopeName" -MemberType NoteProperty -Value $ScopeName
    $obj | Add-Member -Name "StartRange" -MemberType NoteProperty -Value $StartRange
    $obj | Add-Member -Name "EndRange" -MemberType NoteProperty -Value $EndRange
    $objArr += $obj
}
$objArr | Export-Csv "DHCP_Range.csv" -Encoding UTF8 -Delimiter ";" -NoTypeInformation