my @netstat = `netstat -s`; my @matches=("invalid headers", "packets dropped"); my $matches = join('|', @matches); foreach (@netstat) { print if /$matches/; }