Help for this page

Select Code to Download

Select or download this

my @stopwords = qw( longwordOne anotherLongWord thirdLongHere );
my $stopmatch = join( '|', @stopwords );
...
    next if /$stopmatch/i;
    print;
}