Help for this page
#!/usr/bin/perl use strict; ... } return \@f; }
# get xml sub get_xml { ... </result> </response>'; }