in reply to extract a number from a line.

What have you tried? perlretut should give you a start...