if ($line =~ m/\014/) { # $line contains a Control-L }