$_ = "answer4u"; ($num) = /(\d+)/;