my $library = XMLin($xml, forcearray => [ qw(book author) ]);