Lunch hours effort in downloading then converting PuTTY themes into a standard JSON format

PuTTY-Theme-Grabber.ps1

$ThemeLists = 'http://putty.org.ru/themes/index.html', 'http://putty.org.ru/themes/page2.html', 'http://putty.org.ru/themes/page3.html', 'http://putty.org.ru/themes/page4.html', 'http://putty.org.ru/themes/page5.html'

foreach ($Uri in $ThemeLists)
{
    $Content = Invoke-WebRequest -Uri $Uri
    $List = $Content.ParsedHtml.getElementsByTagName('ol')
    $Links = $List[0] | foreach {$_.getElementsByTagName('a') | where {$_.textContent -ne $null} }
    
    foreach ($Link in $Links)
    {
        $Url = 'http://putty.org.ru/' + $Link.pathname
        $Name = $Link.textContent
        $FileName = $Name -replace ' ', '-'
        
        $WebContent = Invoke-WebRequest -Uri $Url
        $Code = ($WebContent.ParsedHtml.getElementsByTagName('pre'))[0].innerText
        
        $Obj = New-Object -TypeName PSCustomObject -Property @{
            Name = $Name
            Url = $Url
            Colors = [ordered]@{}
        }
        
        foreach ($Line in $Code -split "`r`n")
        {
            if ($Line -like '"*')
            {
                $SplitLine = $Line.Replace('"', '').Split('=')
                $Obj.Colors.Add($SplitLine[0], $SplitLine[1])
            }
        }
        
        $json = $Obj | Select Name, Url, Colors | ConvertTo-Json
        $json -replace '  ', ' ' -replace '          ', '    ' -replace '        ', '  ' | Out-File -FilePath "d:\themes\$FileName.json" -NoNewline -Encoding utf8
    }
}