首页 > 试题广场 >

请选出以下Perl程序的正确输出结果。 @data=qw#n

[单选题]

请选出以下Perl程序的正确输出结果。

@data=qw#name@Cindy age@14 birthday@2008@0520 gender@girl#;

for(@data){

   my @data_spl=split /@/,$_;

   my $data_0=$data_spl[0];

   my $data_1=$data_spl[1];

   $data_1 .= ".$data_spl[2]" if $data_spl[2];

   print "$data_0:$data_1;";

}

  • name Cindy;age:14;gender:girl;

  • name Cindy;age:14;birthday:0520;gender:girl;

  • nameCindy;age:14;birthday:2008;gender:girl;

  • nameCindy;age:14;birthday:2008.0520;gender:girl;

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