if($reference =~ m/38[0-9]{8}[A-Z]{3}/)<br>
{
}
else
{
$reference = "";
}