小编Joe*_*ton的帖子

所以我开始说我对Perl不太熟悉.我有一个项目,我已经完成了工作,需要相当多的Perl工作.大部分都是有道理的,但我坚持一个非常简单的问题.

我为了示例目的简化了我的代码.如果我可以让它工作,我可以编写项目的其余部分没问题,但由于某种原因,我似乎无法得到像以下一样简单的东西为我工作:

#!/usr/local/bin/perl
@names = ('Harry','Larry','Moe');
foreach $name (@names){
    if($name == 'Harry'){
        print $name;
    }
}

任何帮助是极大的赞赏!

编辑:fyi以上输出如下:

HarryLarryMoe