if ($line =~ m/".?".?".?"/g)