# The last number. $text =~ /^.*\b(\d+)/