@ARGV = map "zcat $_ |", qw[ ../log.dummy-10-01-06-05.gz ../log.dummy-10-05-18-05.gz ../Btree.gz/ ]; while ( <> ) { print if /Btree/ .. /PSE:/ or /PROCESSING \Q$ARGV/; }