That would make "05 stringstring" return 05, though, not 5.

Maybe something like:

my ($num) = $string =~ /0*(\d+)/;

That would also correctly set $num to 0 for a string like "string0string", right?


Queue
still making his way through Mastering Regular Expressions