Help for this page

Select Code to Download


  1. or download this
    use XML::Simple;
    use Data::Dumper;
    ...
        <downtime></downtime>
      </item>
    </list>
    
  2. or download this
    $VAR1 = {
      'item' => {
    ...
        }
      }
    };
    
  3. or download this
    my $ref = XMLin(\*DATA,KeyAttr=>[]);
    
  4. or download this
    $VAR1 = {
      'item' => [
    ...
        }
      ]
    };
    
  5. or download this
    print $_->{name} for @{$ref->{item}};