#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
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