#!/usr/bin/perl -w use strict; use XML::Simple; my $xml = new XML::Simple; my $data = $xml->XMLin("testing.xml"); for (my $i=0;$i<$#{$data};$i++) { if($data->[$i]->{Phones}) { print "\n$data->[$i]->{Phones}->{Manufacturer}"; print "\n$data->[$i]->{Phones}->{Model}"; print "\n$data->[$i]->{Phones}->{Version}"; print "\n$data->[$i]->{Phones}->{Count}"; print "\n==========================="; } }
In reply to Re: XML::Simple - storing/retrieving 2 tables into 1 XML file
by lamp
in thread XML::Simple - storing/retrieving 2 tables into 1 XML file
by iphony
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |