Padre给出关于不存在的行的错误消息

时间:2012-09-04 12:33:24

标签: perl padre

我在Windows上使用“perl program.pl”在命令提示符或“perl program.pl file1.txt file2.txt”中运行此程序。

use strict;
use warnings;

print "there were ",scalar(@ARGV), " arguments passed to this program\n";
if ( scalar(@ARGV) > 1 )
{
    print "First Argument: $ARGV[0]\n";
    print "Second Argument: $ARGV[1]\n";
}


sub process_file($)
{
        my $filename = shift;
        print "will process file $filename\n";
        #open(INPUT_FILE,"<$filename") || die("could not open $filename");     
}

即使退出并回到Padre后,当我运行它时,我会看到这个对话框(如果单击Yes按钮,它仍会运行正常):

  

警告X第31行:使用| char没有|在开始   或结束通常是拼写错误。你想继续吗?

     

[是] [否]

1 个答案:

答案 0 :(得分:2)

我使用or代替|| open。顺便说一句,我总是被告知open的三种论证形式应该是应该使用的。我知道Perl并不总是引用有问题的行。当然,我理所当然地认为注释掉的线是有问题的线,你评论它作为测试?