if ($checked =~ /^\w{3}\d{4,7}/)