从字符串Perl Regex的后缀中删除Alpha字符

Chr*_*son 1 regex perl

如何从行中删除alpha后缀?即

AA12412BB应返回AA12412

基本上向右看,在最后一个数字字符后删除任何字符

Eug*_*ash 5

试试这个: $line =~ s/\D+\z//;