perl xml_simple.pl