C:\> type con | perl -pe "tr/a-zA-Z/A-Za-z/"
This is a test
tHIS IS A TEST
This is the SECOND line I've typed
tHIS IS THE second LINE i'VE TYPED
^Z