danield wrote:
> Hello all,
>
> I have received a solution for my problem (reading from log) from Tom
> Kinzer. The code is:
>
> #!/usr/bin/perl -w
> use strict;
> my $log_file = "/appl/log/4e4d/20031130.txt";
> open LOG, "< $log_file" or die "Could not open file $!";
> while ( ) {
> chomp;
Also, Daniel Post what the data you're scanning looks like. That should
help.
-Tom
-Original Message-
From: danield [mailto:[EMAIL PROTECTED]
Sent: Sunday, December 07, 2003 8:43 PM
To: [EMAIL PROTECTED]
Subject: Reading from a log - still a problem
Hello all,
I have received a solut
Debug time. Need more info.
Is it ever meeting the if's condition's?
Try this and see what happens:
#!/usr/bin/perl -w
use strict;
my $log_file = "/appl/log/4e4d/20031130.txt";
open LOG, "< $log_file" or die "Could not open file $!";
my ($valueCount, $lineCount);
while ( ) {
chomp;
$li
