On 11-11-23 03:31 PM, Mark Wagner wrote:
That would work, but it would introduce the need to periodically prune
the file, and would make reading the file much more complicated: if
the disk fills up, the final line could well be a fractional
timestamp, so I'd need to verify that what I'd just read was valid.
Use a rotating log file. This one rotates every week:
sub log_status {
use POSIX;
my $file = strftime( 'status-%w-%a.txt', localtime );
open my $fh, '>>', $file or die "could not open $file: $!\n";
for my $status ( @_ ){
print $fh "$status\n" or die "could not print to $file: $!\n";
}
close $fh or die "could not close $file: $!\n";
}
--
Just my 0.00000002 million dollars worth,
Shawn
Programming is as much about organization and communication
as it is about coding.
Never give up your dreams. Give up your goals, plans,
strategy, tactics, and anything that's not working but never
give up your dreams.
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
