perl -v

This is perl, v5.8.7 built for MSWin32-x86-multi-thread
(with 14 registered patches, see perl -V for more detail)

Binary build 815 [211909] provided by ActiveState
Built Nov  2 2005 08:44:52

##</code><code>##

#!perl
use utf8;
use strict;
use diagnostics;

my $name	= '&#19996;&#35199;.txt';

{
	open my $fh, '>', $name or die "could not open file <$name> for writing: $!";
	binmode $fh, ':utf8';
	print $fh "&#20320;&#22909;&#19990;&#30028;\n";
	close $fh;
};