C:\>mydatabaseexamcommand | perl -MEncode=from_to -pe "from_to($_,q[latin1],q[cp850])"