|
From: Martin J. E. <mar...@ea...> - 2012-04-18 09:49:23
|
panic: sv_setpvn called with negative strlen at /home/perlbrew//perls/perl-5.14.2/lib/site_perl/5.14.2/Log/Log4perl/Layout/PatternLayout.pm line 358.
That line in my distribution is:
##################################################
sub shrink_category {
##################################################
my($category, $len) = @_;
my @components = split /\.|::/, $category; # <-------------- here
if(@components > $len) {
splice @components, 0, @components - $len;
$category = join '.', @components;
}
return $category;
}
perl -MLog::Log4perl -le 'print $Log::Log4perl::VERSION;'
1.36
This is Perl 5.14.2 on Linux 32 bit machine built as default via perlbrew.
Any ideas.
Martin
--
Martin J. Evans
Easysoft Limited
http://www.easysoft.com
|