RosettaCodeData/Task/Rot-13/PowerShell/rot-13.psh

14 lines
396 B
Plaintext

Function ROT13($String)
{
$Alphabet = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
$Cipher = "NOPQRSTUVWXYZABCDEFGHIJKLMnopqrstuvwxyzabcdefghijklm"
Foreach($Char in $String.ToCharArray())
{
If ( $Char -match "[A-Za-z]" )
{ $NewString += $Cipher.Chars($Alphabet.IndexOf($Char)) }
else
{ $NewString += $Char }
}
Return $NewString
}