http://qs321.pair.com?node_id=133374


in reply to Excluding words with more than three a

perl -ne'y/a//>3|y/b//>2|y/k//>2||print' file
#    12345678901234567890123456789012345
#             1         2         3

[download]

In Section Seekers of Perl Wisdom