有没有办法做“反向”。=?

时间:2013-06-10 01:14:19

标签: perl

我想在$num

的前面添加0
$num = "0".$num;

这样可以正常工作,但有没有办法用$num.=加上某种运算符或其他东西来告诉它以相反的方式连接?或者其他任何方式,一般来说?

4 个答案:

答案 0 :(得分:4)

没有。任务操作员不会那样工作。

$a .= "foo";

...总是意味着与

相似的东西
$a = $a . "foo";

没有运算符和#34;连接这些字符串并反转顺序",因此没有相应的赋值运算符。

答案 1 :(得分:1)

0前面插入$num

$num =~ s|^|0|;

答案 2 :(得分:0)

没有前置运算符,但您可以这样做。

假设尚未定义$num

my $num = '0';
$num .= expr-that-generates-the-number;

所以你有效地将0添加到变量中而不必两次输入变量。

答案 3 :(得分:-2)

如果您经常这样做,可以将字符串元素转储到数组中然后反转它?但是,您不一定会减少代码量,但可能更容易跟踪所有内容。

$array = array();

array_push ( $array , "test" );
array_push ( $array , 0 );

$array = array_reverse( $array );

echo implode( "" , $array );