beitian_123的博客

1. =~ m/^[0-9]+$/ 用于匹配正则表达式 2. my $celeise = <STDIN>

perl写文件 注意：perl写文件时，必须使用的是 真实完整路径 my $fileName; $fileName = "D:\\13.perlLearn\\test01\\report.txt"; open(my $fh , ">", $fileName) or die "Could not open file report.txt $!"; print $fh "this is my first test, please ignore it,thanks \n"; close $fh