用Open() 函数打开文件 打开文件的常用方法是: open(FH, "< $filename") or die "Couldn't ope