Help for this page
my @root = (1022, 2);
$verbose and warn "found " . @root . " root nodes: " . join(" ", grep +{ defined } @root[0 .. 7]);
Use of uninitialized value in hash element at ./rock-cut line 163. Can't use an undefined value as an ARRAY reference at ./rock-cut line +171.
$verbose and warn "found " . @root . " root nodes: " . join(" ", @root +[0 .. (@root < 8 ? @root : 8) - 1]);
grep { defined } @root[0 .. 7]
#!perl use warnings; no warnings "uninitialized"; ... $t = $h{17}; @t = @h{18, 19}; $D->dumpValues(\@a, \%h); __END__
0 ARRAY(0x81495c0) 0 empty slot ... 5 => 5 6 => 5 7 => undef
www.com | www.net | www.org
No recent polls found