perl中reverse用法问题在perl中 reverse遇到/bin/perl@arr = qw / a b c d/;chomp( @arr );@arr = reverse ( @arr );print @arr;上面能正确翻转数组 打印出 dcba如果我这样写：/bin/perl -w#print "输入字符串(ctrl+d结束):\n";@arr

perl中reverse用法问题在perl中 reverse遇到/bin/perl@arr = qw / a b c d/;chomp( @arr );@arr = reverse ( @arr );print @arr;上面能正确翻转数组 打印出 dcba如果我这样写：/bin/perl -w#print "输入字符串(ctrl+d结束):\n";@arr
perl中reverse用法问题
在perl中 reverse遇到
/bin/perl
@arr = qw / a b c d/;
chomp( @arr );
@arr = reverse ( @arr );
print @arr;
上面能正确翻转数组 打印出 dcba
如果我这样写：
/bin/perl -w
#print "输入字符串(ctrl+d结束):\n";
@arr = ;
chomp( @arr );
@arr = reverse ( @arr );
print @arr;
这样输出的还是按照输入的序列,并没有达到反转功能,请问这是什么问题.

perl中reverse用法问题在perl中 reverse遇到/bin/perl@arr = qw / a b c d/;chomp( @arr );@arr = reverse ( @arr );print @arr;上面能正确翻转数组 打印出 dcba如果我这样写：/bin/perl -w#print "输入字符串(ctrl+d结束):\n";@arr
建议
如果要达到反转功能
需要
$str = ;
chomp $str ;
$str = reverse $str ;
print $str;
迈出了扎实的反转一步.
是
a b c d +Ctrl D--->-----> @arr = ; ----------->$arr[0]="a b c d"
a +Enter b+Enter c+Enter d+Enter +CtrlD------>------>@arr=qw/a b c d/;
@arr = qw / a b c d/;-->$arr[0]="a" $arr[1]="b" $arr[2]="c" $arr[3]="d"