my $string = 'p23'; if($string =~ /[pP](\d+)/){ print $1 }' [download]
In reply to Re: help related to regular expression by lidden in thread help related to regular expression by john_costa