Автоматизированная работа с плейлистами Iptv в powershell

#EXTINF:-1 group-title="ВИДЕОКАМЕРЫ" tvg-logo="http://ekzot.ucoz.net/ch_icons/v/vilamoura.png",VILAMOURA
http://video-auth1.iol.pt:1935/beachcam/vilamoura/chunks.m3u8
#EXTINF:119740 group-title="ФУТБОЛ" tvg-logo="http://ekzot.ucoz.net/ch_icons/m/match_futbol_3.png",Матч! Футбол 3 [SD]
http://b1.only4.tv/1402/video.m3u8?token=tKxpeDcuOQ

#EXTINF:-1 group-title="GERMANY" tvg-logo="https://i.**********/YCqVWjw.png",OK4 Koblenz
http://stream-cdn.ok54.de/hls/ok4.m3u8?fluxustv.m3u8

#EXTINF:5803088 group-title="������️ ФИЛЬМЫ" tvg-logo="http://ekzot.ucoz.net/ch_icons/t/tolko_ne_oni.png",Только не они (2018)
http://hls.kinoplayer.co/hls/tolko-ne-oni.2O18.O.HDRip/playlist.m3u8

#Основной скрипт блок
@(for($i, $arr = 0, (Get-Content F:\IPTV\4_Obyedinenie\TV\big_plist.m3u -Encoding utf8); $i -lt $arr.Length;) {
$a, $b = $arr[$i], $arr[$i + 1]
if ($a.StartsWith('#EXTINF') -and $b -match ':\/\/') {
#Каналы, где прописаны группы, сразу выводим в хост
if ($a -match '#EXTINF.*group-title' -and $b -match ':\/\/') {
"$a`n$b"
$i += 2
}
#В каналы, где нет групп, добавляем группу Разные
elseif ($a -notmatch '#EXTINF*group-title' -and $b -match ':\/\/' ) 
{
$a -replace '#EXTINF.*,(.*)',"#EXTINF:-1 group-title= `"NO Groups`",`$1`n$b" 
$i += 2
}
}
else {
++$i
continue
} | Out-File F:\IPTV\5_Cheking\TV\out_plist.m3u -Encoding utf8

$i=0
gc F:\IPTV\0_URLS\Input.txt | %{ $WebClient.DownloadFile($_,"F:\IPTV\0_URLS\my_file$i.m3u");++$i}

$WebClient = New-Object System.Net.WebClient
$i=0
gc F:\IPTV\0_URLS\Input.txt | %{ $WebClient.DownloadFile($_,"F:\IPTV\0_URLS\my_file$i.m3u");++$i}

(iwr "http://iptvpro.vision-new.org:8789/get.php?username=IPTVPRO22VODS22&password=W2T29z9cBP&type=m3u" -UseBasicParsing).statuscode

(iwr "F:\IPTV\Svalka\URLS_Input.txt" -UseBasicParsing).statuscode

#EXTINF:-1 group-title="Познавательные",Fine living HD
http://myott.tv/stream/E4NBLH19Y5/273.m3u8

#EXTINF:111 group-title="Прочие каналы:",Fine Living HD
http://5.61.48.23/42/4e183238083d8e9e3e56f5f24145dc0464bfd608/111/stream.m3u8

$new_urls_input = @()
gc "F:\IPTV\Svalka\URLS_Input.txt" | ?{ (iwr $_ -UseBasicParsing).statuscode -eq 200 } | %{ $new_urls_input += $_}

$my_url        = 'https://www.cyberforum.ru'
$HTTP_Request  = [System.Net.WebRequest]::Create($my_url)
try   { $HTTP_Response = $HTTP_Request.GetResponse() }
catch { $HTTP_Response = $null }
$HTTP_Status   = [int]$HTTP_Response.StatusCode
 
if($HTTP_Status -eq 200) 
  { 
    Write-Host "Сайт = OK!" 
  } 
 else 
  { Write-Host "Сайт не доступен..." }
if($HTTP_Response -ne $null) { $HTTP_Response.Close() }

$new_urls_input = @()
gc "F:\IPTV\Svalka\URLS_Input.txt" | ?{ (iwr $_ -UseBasicParsing).statuscode -eq 200 } | %{ $new_urls_input += $_} | Out-File F:\IPTV\Svalka\URLS_good.txt -Append

gc "F:\IPTV\Svalka\URLS_Input.txt" | ?{ (iwr $_ -UseBasicParsing).statuscode -eq 200 } | Out-File F:\IPTV\Svalka\URLS_good.txt -Append

# Get the contents of the file.
$file = get-content ~\file.xml
 
# Loop through the xml file adding all "HD" tags to one file and all non "HD" tags to another file
foreach($text in $file)
{
    if($text.Contains("HD")) {
        Add-Content ~\hd.txt $text
    } 
    else {
        Add-Content ~\nohd.txt $text
    }
}

#6)Перенос фильмов в новый плейлист Films_From_TV1.m3u
$group = 'https://hls.kinoplayer.co/|https://bk2-hls.kinoplayer.co/hls/'
$file = New-TemporaryFile
 
Get-Content F:\IPTV\4_Obyedinenie\TV\T_BL_ng.m3u -Encoding utf8 | Select-String -Pattern $group -Context 1,0 `
| ForEach {($_ -replace '>').Trim()} | Sort-Object -Unique | Set-Content $file.FullName -Encoding utf8
Get-Content $file.FullName | ForEach {$_.Trim()} | Set-Content F:\IPTV\3_V_sbore\Films_Serials\Films_From_TV.m3u -Encoding utf8
 
Remove-Item $file.FullName -errorAction silentlycontinue

$group = 'https://hls.kinoplayer.co/|https://bk2-hls.kinoplayer.co/hls/'
$file = New-TemporaryFile
 
Get-Content F:\IPTV\TEST\TV_Release.m3u -Encoding utf8 | Select-String -Pattern $group -Context 1,0 `
| foreach($text in $file)
{
    if($text.Contains($group)) {
        Add-Content F:\IPTV\TEST\good.txt $text
    } 
    else {
        Add-Content F:\IPTV\TEST\nogood.txt $text
    }
}
НО чуда не произошло )

$group = 'https://hls.kinoplayer.co/|https://bk2-hls.kinoplayer.co/hls/'

$file = New-TemporaryFile

Get-Content F:\IPTV\TEST\TV_Release.m3u -Encoding utf8

Select-String -Pattern $group -Context 1,0

foreach($text in $file)

if($text.Contains($group))

    else {
        Add-Content F:\IPTV\TEST\nogood.txt $text
    }

     $group = '178.124.183.5|mfe.svc.ott.zala.by'
     @(for($i, $arr = 0, (Get-Content .\ipvdenmsru.m3u -Encoding utf8); $i -lt $arr.Length;) {
           $a, $b = $arr[$i], $arr[$i + 1]
           if ($a.StartsWith('#EXTINF') -and $b -match ':\/\/') {
              if ($b -notmatch $group) {
              "$a`n$b"
              
              $i += 2
              }
           else {
              ++$i
              continue
           }
           }
           else {
              ++$i
              continue
           }
       }) | Sort-Object -Unique | Out-File .\2ipvdenmsru.m3u

$d = '#EXTM3U'
$group = 'http://www.......'

    $group = '178.124.183.5'
    $d = '#EXTM3U'
    $c =  @(for($i, $arr = 0, (Get-Content .\ipvdenmsru.m3u -Encoding utf8); $i -lt $arr.Length;) {
        $a, $b = $arr[$i], $arr[$i + 1]
        if ($a.StartsWith('#EXTINF') -and $b -match ':\/\/') {
            if ($b -notmatch $group) {
                "$a`n$b"
                
                $i += 2
            }
            else {
                ++$i
                continue
            }
        }
        else {
            ++$i
            continue
        }
    }) | Sort-Object -Unique
    Set-Content .\2ipvdenmsru.m3u -Value $d,$c

#EXTINF:0,Матильда1 (2017)
https://cdnmfw.tvzavr.ru/stream/tvzavr/3/29b70839-c862-4e0b-870d-7641b74de812/29b70839-c862-4e0b-870d-7641b74de812-audio_rus%3D317769-video%3D4998000.m3u8
#EXTINF:0,Матильда2 (2017)
https://cdnmfw.tvzavr.ru/stream/tvzavr/3/29b70839-c862-4e0b-870d-7641b74de812/29b70839-c862-4e0b-870d-7641b74de812-audio_rus%3D317769-video%3D4998000.m3u8
#EXTINF:0,Зоология1 (2016)
https://cdnmfw.tvzavr.ru/stream/tvzavr/3/38b0dd94-a6b5-48e9-aa66-0397e93c37fd/38b0dd94-a6b5-48e9-aa66-0397e93c37fd-audio_rus%3D317440-video%3D4997000.m3u8
#EXTINF:0,Зоология2 (2016)
https://cdnmfw.tvzavr.ru/stream/tvzavr/3/38b0dd94-a6b5-48e9-aa66-0397e93c37fd/38b0dd94-a6b5-48e9-aa66-0397e93c37fd-audio_rus%3D317440-video%3D4997000.m3u8

#EXTINF:0,Матильда1 (2017)
https://cdnmfw.tvzavr.ru/stream/tvzavr/3/29b70839-c862-4e0b-870d-7641b74de812/29b70839-c862-4e0b-870d-7641b74de812-audio_rus%3D317769-video%3D4998000.m3u8
#EXTINF:0,Зоология1 (2016)
https://cdnmfw.tvzavr.ru/stream/tvzavr/3/38b0dd94-a6b5-48e9-aa66-0397e93c37fd/38b0dd94-a6b5-48e9-aa66-0397e93c37fd-audio_rus%3D317440-video%3D4997000.m3u8

cls
$str = @'
#EXTINF:0,Матильда1 (2017)
https://cdnmfw.tvzavr.ru/stream/tvzavr/3/29b70839-c862-4e0b-870d-7641b74de812/29b70839-c862-4e0b-870d-7641b74de812-audio_rus%3D317769-video%3D4998000.m3u8
#EXTINF:0,Матильда2 (2017)
https://cdnmfw.tvzavr.ru/stream/tvzavr/3/29b70839-c862-4e0b-870d-7641b74de812/29b70839-c862-4e0b-870d-7641b74de812-audio_rus%3D317769-video%3D4998000.m3u8
#EXTINF:0,Зоология1 (2016)
https://cdnmfw.tvzavr.ru/stream/tvzavr/3/38b0dd94-a6b5-48e9-aa66-0397e93c37fd/38b0dd94-a6b5-48e9-aa66-0397e93c37fd-audio_rus%3D317440-video%3D4997000.m3u8
#EXTINF:0,Зоология2 (2016)
https://cdnmfw.tvzavr.ru/stream/tvzavr/3/38b0dd94-a6b5-48e9-aa66-0397e93c37fd/38b0dd94-a6b5-48e9-aa66-0397e93c37fd-audio_rus%3D317440-video%3D4997000.m3u8
'@ -split "`r`n" | ForEach-Object -Begin {$i = 0; $outHash = @{}} -Process {
    If ($i%2 -eq 0){
        $EXTINF = $_
    }
    else
    {
        $outHash.add(($outHash.Count), @{EXTINF = $EXTINF; 'link'=$_})
    }
    $i++
} 
 
$out= ''
for ($i = 0; $i -le $outHash.Count; $i++)
{
    $flag = $false
    for ($j = $i+1; $j -le $outHash.Count; $j++)
    {
        if ($outHash[$i].link -eq $outHash[$j].link){
 
            $flag = $true
        }
    }
    If ($flag -eq $false)
    {
        $out += "$($outHash[$i].EXTINF)`r`n$($outHash[$i].link)`r`n"
    }
}
$out