in reply to Excluding words with more than three a

perl -ne 'print unless (/a.*a.*a/ || /b.*b/ || /k.*k/) }' dictionary.txt
  • Comment on Re: Excluding words with more than three a

In Section Seekers of Perl Wisdom