Public/Get-RCoreTeamRforWindows.ps1

Function Get-RCoreTeamRforWindows {
    <#
        .SYNOPSIS
            Get the current version and download URL for R for Windows.
 
        .NOTES
            Author: Aaron Parker
            Twitter: @stealthpuppy
         
        .LINK
            https://github.com/aaronparker/Evergreen
 
        .EXAMPLE
            Get-RCoreTeamRforWindows
 
            Description:
            Returns the current version and download URL for R for Windows.
    #>

    [OutputType([System.Management.Automation.PSObject])]
    [Diagnostics.CodeAnalysis.SuppressMessageAttribute("PSUseSingularNouns", "")]
    [CmdletBinding()]
    Param()

    # Get application resource strings from its manifest
    $res = Get-FunctionResource -AppName ("$($MyInvocation.MyCommand)".Split("-"))[1]
    Write-Verbose -Message $res.Name

    # Read the RCoreTeamRforWindows version from the YML source
    try {
        $params = @{
            Uri = $res.Get.Update.Uri
            Raw = $true
        }
        $Content = Invoke-WebRequestWrapper @params
        $Version = [RegEx]::Match($Content, $res.Get.Update.MatchVersion).Captures.Groups[1].Value
    }
    catch {
        $Version = "Latest"
    }

    # Follow the download link
    try {
        $params = @{
            Uri = $res.Get.Download.Uri
        }
        $Content = Invoke-WebRequestWrapper @params
        $File = [RegEx]::Match($Content, $res.Get.Download.MatchFile).Captures.Groups[1].Value
        $Url = $res.Get.Download.Uri -replace $res.Get.Download.ReplaceText, $File
    }
    catch {
        $Url = $res.Get.Download.Uri
    }

    # Construct the output; Return the custom object to the pipeline
    $PSObject = [PSCustomObject] @{
        Version = $Version
        URI     = $Url
    }
    Write-Output -InputObject $PSObject
}