在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用于字符串比较。