首页 > 试题广场 >

以下Perl程序的输出是下列哪个选择? @arrays=qw

[单选题]
以下Perl程序的输出是下列哪个选择?

@arrays=qw#green red white#;

deal("red");

deal("black");

deal("yellow");

sub deal {

   my $array = shift;

    foreach $arrays (@arrays){

        if ($array =~ /$arrays/){

          print "Have!";

        }

     }

}

  • Have!

  • Have!Have!

  • Have!Have!Have!

  • 其他选项均不正确

这道题你会答吗?花几分钟告诉大家答案吧!