LinuxSir.cn,穿越时空的Linuxsir!

 找回密码
 注册
搜索
热搜: shell linux mysql
查看: 558|回复: 2

关于perl问题(新手),请高手帮忙,在线等

[复制链接]
发表于 2007-1-9 12:59:01 | 显示全部楼层 |阅读模式
下面是我从网上下载的例子的一部分。
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;

请高手指点
发表于 2007-1-9 20:54:34 | 显示全部楼层
可参考   PerlProgramming3 中的 -S 部分
http://www.pgsqldb.org/bin/view/Perl/PerlTheCommandLineInterface

我自己看得不太明白:)
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-1-10 14:45:15 | 显示全部楼层

huan,谢谢提供资料

谢谢提供资料,这个资料很好,但是关于这个问题还不明白
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表