open (OUT, "output.txt");
 binmode(OUT, ":utf8");
 print OUT Dumper(\@matches);
 close OUT;

##</code><code>##

open( OUT, ">:utf8", "output.txt" ) or die "output.txt: $!\n";

##</code><code>##

print OUT "\x{feff}\n";
# and then print all the utf8 text content...