Hello Monks,

Am looking for hints for a problem with XML generation, I searched internet, perlmonks but could not find an answer that I am looking for

Here is the sample code

    use strict;
    
    use XML::Generator;
    
    my $attribute_name = 'book';
    my $value = 'value';
    my $attribute_value = 'Camel book';
    
    my $xml_handle = XML::Generator->new( pretty => 4 );
    print $xml_handle->$attribute_name($xml_handle->$value($attribute_
+value));
    print "\n";

    exit(0);
[download]

And this will give an output of the form

<book>
<value>Camel book</value>
</book>

But what am interested to know is, how to display multiple values to an XML element something like

<book>
<value>Camel book</value>
<value>Complete Reference - Perl</value>
<value>Black Perl</value>
</book>

I tried using an array ref something like

print $xml_handle->$attribute_name($xml_handle->$value(@$attribute_val
+ue));
[download]

but that didn't work

I don't find a relavant example in CPAN as well.

Any pointers would be really helpful to me, thanks