You need to learn about references. Here is some code but it will be difficult to understand.
for my $parm (sort keys %{ $$VAR1{cmd}{parameter} } ) { print "$parm\n"; print "\tCycle:",$$VAR1{cmd}{parameter}{$parm}{cycle},"\n"; print "\tCommand:\n"; for my $cmd ( @{ $$VAR1{cmd}{parameter}{$parm}{command} } ) { for my $key ( sort keys %{$cmd} ) { print "\t\t$key: ",$$cmd{$key},"\n"; } print "\n"; } }
In reply to Re: XML Parsing
by hdb
in thread XML Parsing
by kiranveluri
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |