Book 1 author 1 Book 1 author 2 Book 1 title Book1ISBN #### #!/usr/bin/perl # Script to illustrate how to parse a simple XML file # and dump its contents in a Perl hash record. use strict; use XML::Simple; use Data::Dumper; my $booklist = XMLin('booklist.xml'); print Dumper($booklist); #### $VAR1 = { 'book' => { 'isbn' => 'Book1ISBN', 'title' => 'Book 1 title', 'author' => [ 'Book 1 author 1', 'Book 1 author 2' ] } } #### $VAR1 = { 'book' => { 'author' => [ 'Book 1 author 1', 'Book 1 author 2' ] 'title' => 'Book 1 title', 'isbn' => 'Book1ISBN', } }