use Encode;
binmode STDIN;
binmode STDOUT;
print encode( 'Windows-1252', decode( 'UTF-8', $_ ) ) while <STDIN>;