#Unix
# Example 2: grep for lines that do not match the supplied regexp expr
+essions
[gasho:~]$ echo '
cat
dog
mouse
horse' | grep -v -e 'mouse' -e 'dog'
cat
horse

#Perl

@filenames = qw(cat dog mouse horse);


@donotmatch = grep {!(/cat/||/horse/)} @filenames;
[download]