in reply to Rotating output from the Perl debugger
I would suggest using Log::Dispatch::FileRotate for this. You can use LineInfo to direct the logging output to a pipe, running a script like this (not tested):
use strict; use Log::Dispatch::FileRotate; my $file = Log::Dispatch::FileRotate->new( name => 'file1', min_level => 'info', filename => 'Somefile.log', mode => 'append' , TZ => '0:0:0:0:2:00:0', DatePattern => 'yyyy-dd-HH', ); while (<>) { $file->log( level => 'info', message => $_); }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: Rotating output from the Perl debugger
by Booger (Pilgrim) on Apr 20, 2005 at 19:22 UTC |
In Section
Seekers of Perl Wisdom