麻烦帮我把下面的内容注释一下。
$file='C:\work\colorca\include\wk_project.h';
$file2='C:\work\colorca\include\wk_project.h.cn.txt';
open(FH,">$file2")or die "unable to open $file2:$!";
$|=1;
open(FW,"$file") or die "unable to open $file:$!";
#chomp(FW);
while(<FW>){
$_=~s/winksi.com/winksi.cn/g;
print FH "$_";
}
close(FH);
close(FW);