C:\test>perl -pe"s[a][A]" phrases.txt >nul