The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

print "# Testing default behavior (parse_empty_lists( FALSE )) ...\n";

ok( $x->_out($pod), '<Document><over-block indent="4"><over-block indent="4"><over-block indent="4"></over-block></over-block></over-block></Document>' );

print "# Testing explicit parse_empty_lists( FALSE ) ...\n";

ok( $x->_out(\&off, $pod), '<Document><over-block indent="4"><over-block indent="4"><over-block indent="4"></over-block></over-block></over-block></Document>' );

print "# Testing parse_empty_lists( TRUE ) ...\n";

ok( $x->_out(\&on, $pod), '<Document><over-block indent="4"><over-block indent="4"><over-block indent="4"><over-empty indent="4"></over-empty><over-empty indent="4"></over-empty></over-block></over-block></over-block></Document>' );

print "# Wrapping up... one for the road...\n"; ok 1; print "# --- Done with ", __FILE__, " --- \n";

1 POD Error

The following errors were encountered while parsing the POD:

Around line 43:

=back doesn't take any parameters, but you said =back POD