# The first standalone number. $text =~ /\b(\d+)\b/