open( OUT, ">:utf8", "a.txt" ) or die "a.out: $!";
print OUT "\x{feff}aaaa\n";
close OUT;