use Encode;
use Encode::HanConvert;
$str8=gb_to_simp("中国的网页");#the  string inside this is chinese characters
use utf8;
open OUT,">:utf8","D:\\output1.doc" or print "could not open";
print "\n",utf8::is_utf8($str8),"\n\n\n";
print OUT $str8;
close OUT;
no utf8;