my @value_eles;
for (@values) {
   push @value_eles, $xml_handle->value($_);
}

print $xml_handle->book(@value_eles);