($name, $num) = split /(?=\d+$)/, $str, 2;