|
下面是我从网上下载的例子的一部分。
2,3行是什么意思?在网上搜索的结果是这两行没有也可也。
4,行的功能是什么?我觉得是把命令行参数,依次向前一动一位,但是关于这个语句〈'$'.$1.'$2;〉',我实在不知道是用来做什么的。
1, #!/usr/bin/perl
2,eval 'exec /usr/bin/perl -S $0 ${1+"$@"}'
3, if $running_under_some_shell;
# this emulates #! processing on NIH machines.
# (remove #! line above if indigestible)
4,eval '$'.$1.'$2;' while $ARGV[0] =~ /^([A-Za-z_0-9]+=)(.*)/ && shift;
请高手指点 |
|