Help for this page
# Building the array of terms: ... chomp $term; push @terms, $term; }
# Printing sources that do not match of of the terms: ... chomp $source; print "$source\n" unless grep { $source =~ /$_/ } @terms; }