Help for this page

Select Code to Download


  1. or download this
    <root>
  <ROW>
...
  </ROW>
...
</root>
  2. or download this
    use XML::Simple;
my($xmlstring)=<>;
my($xmlObj)=XML::Simple->new(noattr=>1);
my($dataref)=$xmlObj->XMLin($xmlstring);
  3. or download this
    my($xmlstring)=$r->param('xmlString');
  4. or download this
    Can't use string (" barba") as a symbol ref while "strict
refs" in use at /usr/local/lib/perl5/site_perl/5.6.1/i586
linux/XML/Parser/Expat.pm line 456.
  5. or download this
          eval {
        $ioref = *{$arg}{IO};
      };
      undef $@;