in reply to Re: Check tag value
in thread Check tag value
This is what I have so far ..I am still working on it #!/usr/bin/perl my $dir = "/tmp/asheesh"; my gdir = "$dir/temp"; opendir (DIR, $dir) or die "can't open dir"; @files = readdir(DIR); closedir DIR; foreach $files(@files) { unless ( $files eq "." || $files eq "..") { open (FILE, "$files") or die "can't open file"; @Lines=<FILE>; close FILE; foreach $Lines(@Lines) { chomp $Lines; if ( $Lines eq "<NumberofDays>\d+</NumberofDays>" )
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Re: Re: Check tag value
by eXile (Priest) on Apr 08, 2004 at 15:09 UTC | |
Re: Re: Re: Check tag value
by hmerrill (Friar) on Apr 08, 2004 at 12:01 UTC | |
by Anonymous Monk on Apr 08, 2004 at 12:06 UTC | |
by Anonymous Monk on Apr 08, 2004 at 12:20 UTC | |
by hmerrill (Friar) on Apr 08, 2004 at 12:51 UTC |
In Section
Seekers of Perl Wisdom