Download free Microsoft eBooks in massive list provided by Microsoft

Download-MsftEbooks.ps1

#[1] https://blogs.msdn.microsoft.com/mssmallbiz/2016/07/10/how-to-download-all-of-the-free-ebooks-and-resources-in-my-free-ebooks-giveaway/
#[2] https://blogs.msdn.microsoft.com/mssmallbiz/2017/07/11/largest-free-microsoft-ebook-giveaway-im-giving-away-millions-of-free-microsoft-ebooks-again-including-windows-10-office-365-office-2016-power-bi-azure-windows-8-1-office-2013-sharepo/
#Some links are to webpages or Sway, I'd like to save the link to these pages - still to do.
$saveTo = 'D:\MS_eBooks\' #where to place the eBooks
New-Item -Path $saveTo -ItemType Directory
$masterListLink = 'http://ligman.me/29zpthb' #[1] link to the text file of links to the eBooks.
#$masterListLink = 'http://ligman.me/2sZVmcG' #[2] link to the text file of links to the eBooks.
#Get an array of links, triming the header in the first line.
$eBookLinks = @((Invoke-WebRequest -Uri $masterListLink -MaximumRedirection 1).Content -split "`n" | % {$_.trim()} | select -Skip 1 )
foreach ($eBookLink in $eBookLinks) {
    try {
        $request = Invoke-WebRequest -Uri $eBookLink -Method Head -ErrorAction Ignore #retrieve details on the eBook short URL
        if($request.StatusCode -like '200') {
            $eBookURL = $request.BaseResponse.ResponseUri.AbsoluteUri #final URL to eBook
            $eBookTitle = $saveTo + [uri]::UnescapeDataString($request.BaseResponse.ResponseUri.Segments[-1]) #full path of eBook on disk
            Write-Output "Saving: $eBookTitle"
            Invoke-WebRequest -Uri $eBookURL -OutFile $eBookTitle
            Unblock-File $eBookTitle
        } else {
            Write-Warning "Failed: $eBookLink"
        }
    }
    catch {
        Write-Warning "Failed: $eBookLink"
    }
}