Public/Get-SylviaWitteman.ps1
|
function Get-SylviaWitteman { [CmdletBinding()] param() $DutchCulture = New-Object -TypeName System.Globalization.CultureInfo -ArgumentList 'nl-NL' Invoke-WebRequest -Uri 'https://www.parool.nl/auteur/sylvia-witteman' ` | Select-Object -ExpandProperty Links | Select-Object -ExpandProperty href | Where-Object { $_ -like '*/columns-opinie/*' -or $_ -like '*/ps/*' } | Select-Object -First 10 | ForEach-Object { $Document = ConvertTo-HtmlDocument -Text (Invoke-WebRequest -Uri $_ | Select-Object -ExcludeProperty Content) $DateText = (($Document | Select-HtmlNode -XPath '//meta[@property="article:published_time"]').GetAttributeValue("content", "") -split 'T')[0] [PSCustomObject][Ordered]@{ PSTypeName = 'UncommonSense.Parool.Article' Url = $_ Date = [DateTime]::ParseExact($DateText, 'yyyy\-MM\-dd', $DutchCulture) Title = $Document | Select-HtmlNode -CssSelector h1 | Get-HtmlNodeText Body = (($Document | Select-HtmlNode -CssSelector 'p.z3lfzo5' -All | Get-HtmlNodeText -SkipRemoveLineBreaks) -join ' ') -replace 'Reagereren\? s\.witteman@parool\.nl\.?', '' -replace 'Sylvia Witteman \(1965\) is columniste en schrijfster\. Drie keer per week lees je hier haar column\. Lees alle columns van Sylvia Witteman terug\.\s*$', '' } } } |