'abc12345' =~ /(\d+)$/; print $+[1] - $-[1]; #### 5