perl - 在 perl 中使用 argv[0] 拒绝空白查询

Question

当输入空白查询时，我试图让脚本退出。从我读过的内容来看，这段代码应该可以正常工作，但似乎不想，因为 ""不是数字。解决方法是什么？

if(($#ARGV < 0) || ($ARGV[0] == "")){
  print "$0: Enter a query.\n";
  exit 1;
}

为了澄清，

perl run.pl "query"

应该工作，而

perl run.pl ""

应该提示输入一个字符串。

Answer 1

试试

if(($#ARGV < 0) || ($ARGV[0] eq "")){
  print "$0: Enter a query.\n";
  exit 1;
}

eq用于字符串比较。