blob: 84de31eb82684a847406b955f774839f484ad9f6 [file] [log] [blame]
#!/usr/bin/perl -wT
use utf8;
use Encode 'encode';
print "Content-type: text/plain; charset=windows-1251\n\n";
print encode("windows-1251", "Проверка");