Select Code to Download

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

@/=map{[/./g]}qw/.h_nJ Xapou cets krht ele_ r_ra/;
map{y/X_/\n /;print}map{pop@$_}@/for@/