($string =~ /\d+/g)[0];