perl reverse 函数

参考 http://www.perlcn.com/perlbc/perljc/315.html
使用reverse操作符时，perl会先计算变量的值，也就是=右边的值，然后再进行复制，如果reverse是将值赋给新的数组，那么原来的变量的值是不变的，如果将值赋给本身，则会改变变量的值，如果不复制给任何变量，那么这个操作是错误的，使用的时候应该特别注意。

print reverse("HelloWorld"); # "HelloWorld"

$rev = print reverse("HelloWorld");
print "$rev"; # "dlroWolleH"