perl如何支持类似“00013”字符串？
perl如何支持类似“00013”字符串？
$x = "00013";
print $x;
打印 13


[解决办法]
$x = "00013";
print int $x;
[解决办法]
$a = "000";
$b = "13";
$c = $a.$b;
print $c;
[解决办法]
+ 是数值操作符，"000" + "13"会将两操作数都转化为数值再相加。
. 字符串拼接操作符是，即 "000" . "13"。

C风格的字符串格式化也是可行的 sprintf("%s%s", "000", "13")。