#!C:\perl\perl.exe -w

use open IN => ':encoding(UCS-2LE)', OUT => ':encoding(UTF-8)';
use open ':std';

while (<STDIN>) {
    print STDOUT;
}