Help for this page
use strict; use CGI::Pretty qw(book chapter); # for pretty XML ... $c->chapter({-number=>2},"Bits and Pieces"), $c->chapter({-number=>3},"Unary and Binary Operators"), );
<book title="Programming Perl" authors=" Larry Wall, Tom Christiansen, + Jon Orwant"> <chapter number="1"> ... </chapter> </book>