When I run it I getuse strict; use Tie::File; use Date::Manip; use Fcntl; tie my @log, 'Tie::File', 'logfile', mode => O_RDONLY or die "Unable t +o open file"; for (@log) { my $t = "$_"; if ($t =~ /time: (.* 2008)/) { my $xxx = ParseDate($1); } } untie @log;
I think this only happens when something tries to write to a Tied file when it can't be written to.
And it's the my $xxx... line that causes it. How is that possible?
Thanks for any pointers!In reply to Is this a bug with Date::Manip? by aidan
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |