Help for this page

Select Code to Download

Select or download this

$text=~/([A-Z]{2,5}\d{5})/ or die;
 # parenthesis is for "remembering" what we matched, 
 # we can get it with $1 later..
print "got $1";

Select or download this

$text='ADABCDE6789023424';
$text=~/([A-Z]{2,5}\d{5})/ or die;
print $1;