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
------------------------------------------------------------------------------
Better than sec? Nothing is better than sec when it comes to
monitoring Big Data applications. Try Boundary one-second
resolution app monitoring today. Free.
http://p.sf.net/sfu/Boundary-dev2dev
_______________________________________________
log4perl-devel mailing list
log4perl-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/log4perl-devel
