($number) = $line =~ m{ ( [A-Z]{2}\d{9} ) }ix;