请教：$a="ABC1",如何将其中的数字“1”单独提出来放

wanahoo

如题，多谢！

望尘莫及

($getDigit) = ~s/ABC(\d)/;

试试这个

wanahoo

原帖由 "望尘莫及" 发表：
($getDigit) = ~s/ABC(\d)/;

试试这个

试了，还是不行的说

望尘莫及

$a="ABC1",
改成'ABC1'

望尘莫及

我这没装环境,你那报的是什么错

apile

($getDigit) = ~s/ABC(\d)/;
語法不對.....
s///;

c1l2d3

使用函数也可：substr($a,length($a)-1,1);

wanahoo

[quote]原帖由 "c1l2d3"]使用函数也可：substr($a,length($a)-1,1);[/quote 发表：

多谢，可以！

gunguymadman

my ($b0=$a=~/.*(.)$/;

jeff_gu

给你一个简单又通用的
$a="ABC1";
$a=~/\d/;
print "$&\n";
其中特殊变量$&代表匹配到的值。