我正在阅读别人写的Perl脚本,我对Perl不太熟悉所以有人能让我知道前三行做了什么?
my $ref = do($filename); $ref != 0 or die "unable to read/parse $filename\n"; @varLines=@{$ref}; foreach $ord (@varLines) { # code here }
在获取命令行参数设置$filename之后,这是在程序的开头
传递给此脚本的文件格式为
[ { "Key1" => "val1","key2" => " "A",},{ "Key3" => "val2","key4" => " "B",]