You mean like this? I'm not 100% sure what you're asking.
##
use strict;
use warnings;
open(INFILE,myfile.txt) || die Couldn't open 'myfile.txt' for
reading!\n;
my @LinesIWantToKeep;
while(INFILE){
if($_ =~ /Jan 12/){
push
--- Tim Johnson [EMAIL PROTECTED] wrote:
You mean like this? I'm not 100% sure what you're
asking.
I guess not. For example,
Wed Jan 12 03:50:18 PHT 2005 updating...
Sun Jan 9 10:00:10 PHT 2005 not updating
Fri Jan 7 09:40:14 PHT 2005 down
Sat Jan 31 19:18:53 PHT 2004 down
Sat Jan 31
Oh, ok. So you mean like...
if($_ =~ /\bJan\b.*\bDec\b/){
print $_;
}
?
-Original Message-
From: Harold Castro [mailto:[EMAIL PROTECTED]
Sent: Thursday, February 03, 2005 5:02 PM
To: Tim Johnson; beginners@perl.org
Subject: RE: Is there a regexp that will match two or more
Harold Castro [EMAIL PROTECTED] wrote:
: --- Tim Johnson [EMAIL PROTECTED] wrote:
:
: :
: :
: : You mean like this? I'm not 100% sure what you're
: : asking.
: I guess not. For example,
:
: Wed Jan 12 03:50:18 PHT 2005 updating...
: Sun Jan 9 10:00:10 PHT 2005 not updating
: Fri Jan 7 09:40:14