if ($line =~ /^\b\d/)