in reply to grep unmatch error
perl -E 'my @tokens=qw|this that other foo bar baz|; my %stopwords=qw|that 1 foo 1|; say for grep {!$stopwords{$_}} @tokens' __OUTPUT__ this other bar baz
"Think of how stupid the average person is, and realize half of them are stupider than that." - George Carlin
|
|---|