my $gxmlConfigObjt = new XML::Simple( forcearray => 1 ,keyattr => {} ,rootname => 'feedback' ); # OPEN : Open the file... # my $gxmlConfigDoc = $gxmlConfigObjt->XMLin( $gxmlConfigFile ); #### .$gxmlConfigDoc = { . 'item' => [ . { 'zip-code' => ['03036'] . ,'city' => ['Chester'] . ,'name' => ['Adym S. Lincoln'] . ,'address' => ['123 Lane Road'] . ,'state' => ['NH'] . }, . { 'zip-code' => ['03103'] . ,'city' => ['Manchester'] . ,'name' => ['Joseph C. Lincoln'] . ,'address' => ['1050 Perimeter Road'] . ,'state' => ['NH'] . } . ] .}; #### $gxmlConfigDoc{item}[++$#{gxmlConfigDoc{item}}] = { 'zip-code' => ['01880'], 'city' => ['Wakefield'], 'name' => ['Whatdb'], 'address' => ['20 Harvard Mill Sq'], 'state' => ['MA'] }; #$gxmlConfigDoc{item} = { 'item' => [ # { # 'zip-code' => ['01880'], # 'city' => ['Wakefield'], # 'name' => ['Whatdb'], # 'address' => ['20 Harvard Mill Sq'], # 'state' => ['MA'] # } # ] # }; #push @{ $gxmlConfigDoc{item} }, # 'item' => [ # { # 'zip-code' => ['01880'], # 'city' => ['Wakefield'], # 'name' => ['Whatdb'], # 'address' => ['20 Harvard Mill Sq'], # 'state' => ['MA'] # } # ] #;