Help for this page
use XML::CSV; ... $csv_obj->{column_data} = \@arr_of_data; $csv_obj->print_xml("out.xml");