ну если в консоль я помнится делал так -- но это жесть $xz='пример:';$xz=~tr/а-я/\x80-\x9f/;print "$xz"; - и большими буквами
в общем бери таблицу символов и заменяй одно на другое по их коду
можно еще
use encoding 'cp1251';

просто в вин консоль идет в dos кодировке -- в никсах в utf --- а скрипт может быть написан или на cp1251 или на томже utf