UncommonSense.Teletekst

0.1.0

Private/NormalizeCase.ps1

function NormalizeCase([string]$Text)
{
    [regex]::Replace($Text.ToLowerInvariant(), '^(\w)', { param($Match) $Match.Groups[1].Value.ToUpperInvariant() })
}