Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
</body>
</html>
EOF
  2. or download this
    #!/usr/bin/perl

...
binmode STDOUT, ':utf8';
my $decl = "<?xml version='1.0' encoding='utf-8' standalone='yes'?>";
print $xs->xml_out($data, XMLDecl => $decl);