Hi,
In the following script, I am inserting a time stamp.
The problem is that the time stamp ($sec) is not
incrementing.

What am I doing wrong?

<snip>
open (PORT, "+>COM1") || die "Can't Open Port\n";
open (LOG, "> c:\\temp\\logdata.txt") || die "Can't
Open File\n";

while ( <PORT> ) {
#print $_;
#sleep 1;
#print ("$hour:$min:$sec\n");
#sleep 1;
print LOG ("$_"), ("$hour:$min:$sec\n");
<snip>


Here's the log file. I am expecting the $sec (seconds)
to increment but its not.

<snip>
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
 D=0.0020  g/cc T=26.73C 
10:38:9
<snip>

Thanks in advance.


       
____________________________________________________________________________________
Get the free Yahoo! toolbar and rest assured with the added security of spyware 
protection.
http://new.toolbar.yahoo.com/toolbar/features/norton/index.php

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to