☻ 唐鳳 ☺
and 1 contributors

# get it in array context and # check that our arrays are equal my @children = $tree.get_all_children(); ok eq_array(\@children, [ $sub_tree, $sub_tree_2, $sub_tree_3, $sub_tree_4 ]);

# check that the values from both # contexts are equal to one another ok eq_array($children, \@children);

# now check that the siblings of all the # sub_trees are the same as the children foreach my $_sub_tree (@children) { # test siblings in item context my $siblings = $sub_tree.get_all_siblings(); ok eq_array($children, $siblings); # and now in array context my @siblings = $sub_tree.get_all_siblings(); ok eq_array($children, \@siblings); }

10 POD Errors

The following errors were encountered while parsing the POD:

Around line 227:

=pod directives shouldn't be over one line long! Ignoring all 5 lines of content

Around line 287:

=pod directives shouldn't be over one line long! Ignoring all 4 lines of content

Around line 310:

=pod directives shouldn't be over one line long! Ignoring all 4 lines of content

Around line 348:

=pod directives shouldn't be over one line long! Ignoring all 4 lines of content

Around line 371:

=pod directives shouldn't be over one line long! Ignoring all 4 lines of content

Around line 430:

=pod directives shouldn't be over one line long! Ignoring all 4 lines of content

Around line 483:

=pod directives shouldn't be over one line long! Ignoring all 4 lines of content

Around line 544:

=pod directives shouldn't be over one line long! Ignoring all 4 lines of content

Around line 606:

=pod directives shouldn't be over one line long! Ignoring all 4 lines of content

Around line 659:

=pod directives shouldn't be over one line long! Ignoring all 4 lines of content