perl中reverse用法问题

题目

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结束): ";
@arr = ;
chomp( @arr );
@arr = reverse ( @arr );
print @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 +C...