论坛徽章:: 1

电梯直达

1楼 [收藏(0)] [报告]

发表于 2003-07-11 13:01 |只看该作者 |倒序浏览

if(grep(/-help/,@ARGV)) {
  print "Usage: 246aa.pl [-logout] [-proxy=x.x.x.x]\n";
  exit;
}

$logout = grep(/-logout/,@ARGV);

@proxy = grep(/-proxy=.+/,@ARGV);
if($proxy[0] =~ /=(.+)/) {
  $proxy = $1;
}

我知道 @ARGV  是命令行参数数组,可以用来分别处理各个命令参数.而GREP的作用是将@ARGV数组里匹配 -help 或 -logout 的字段找出来,并赋值于$logout 等变量. 但总的来说,这段代码有什么用? 而($proxy[0] 又是什么意思?谢谢.

文库|博客

apile

富足长乐

论坛徽章:: 1

2楼 [报告]

发表于 2003-07-11 13:52 |只看该作者

下面代码是什么意思?

#--- 抓 -help的argument
if(grep(/-help/,@ARGV)) {
print "Usage: 246aa.pl [-logout] [-proxy=x.x.x.x]\n";
exit;
}
#--抓logout的argument
$logout = grep(/-logout/,@ARGV);
#--因為可能輸入不只一個-proxy所以才用array接受grep的結果...
@proxy = grep(/-proxy=.+/,@ARGV);
#--但是default只會處理第一個proxy..
if($proxy[0] =~ /=(.+)/) {
$proxy = $1;
}