Link to home
Start Free TrialLog in
Avatar of yankeebushsoftware
yankeebushsoftwareFlag for United States of America

asked on

How do I determine when my log file has finished or stopped being written to and record the duration between being invoked and stopped being written to?

How do I determine when my log file has finished or stopped being written to and record the duration between being invoked and stopped being written to?

#!C:\Perl\bin\perl
use File::Tail;
my $ref=tie *FH,"File::Tail",(name=>'ModemLog.txt', tail=>-1);

while( <FH> )
{
        ++$.;
        print "passed $.\n" if /usrAppInit: Done./;
        print "it took ",time-$^T,"seconds\n";

}
SOLUTION
Avatar of ozo
ozo
Flag of United States of America image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
ASKER CERTIFIED SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial