P:\test>perl -ne"$p=tell ARGV; print if /Larry|Robb/ and not scalar <> =~ /Larry|Robb/; seek ARGV, $p, 0; " logfile 1056128833340 Robb 2003-06-20 665 ** 1055439973653 Larry 2003-06-16 815 **