# Find lines starting with "_ and ending with ", and containing optional # leading or trailing whitespace. # my $MAL = '^\s*"_.*"\s*$';