in reply to Re^2: Xml File Reading from PERL
in thread Xml File Reading from PERL

Hi,

If you run the new XML format via the example script I showed you it will output the new data structure.

I'm not going to do it for you however I am willing to help you. If you have problems with complex data structures I suggest you read the following The Perl Data Structures Cookbook

Replies are listed 'Best First'.
Re^4: Xml File Reading from PERL
by issaq (Initiate) on Feb 27, 2012 at 09:01 UTC
    <code> I can able to develop the code like this ********************************************* my $xml = new XML::Simple; my $tblnm="OXF_SIC"; my $config = XMLin('check2.config', ForceArray => [], keyattr => []); foreach my $table (@{$config->{table}}) { if ($table->{name} eq $tblnm) { foreach my $col (@{$table->{columnname}}) { print "$col \n"; } } } ********************************************************** the check2.config file looks like this <config> <columnname>DATE_MODIFIED_ODS</columnname> <columnname>DATE_CREATED_ODS</columnname>
    <columnname>DATE_MODIFIED_ODS</columnname>
    </config> Here i am getting proper output if my $tblnm="OXF_SIC" but when i changed the code to my $tblnm="OXF_SUBSIDIARY" then its throwing the error as:- Can't use string ("DATE_MODIFIED_ODS") as an ARRAY ref while "strict refs" in use at check2_Feb27.pl line 37. Please help me out in this, i am just beginner in Perl this is my 2nd Perl script pls help me <\code>
[reply]

In Section Seekers of Perl Wisdom