Hello , I am very beginner to perl and I am trying to change one existing script to update new API. I have very complicated datastructure which i need to merge and have to print only required fields. But when I merge I get only numeric value. Can some one please suggest any idea? My code: 

my @member_lists = @{$soapResponse->result};
my @memberobjectstatus = @{$soapResponse->result};
my @status = push (@member_lists,@memberobjectstatus);
use Data::Dumper;
print Dumper(@status);

orginal
@member_lists = $VAR1 = bless( [ bless( { 'address' => '/Common/10.116
+.38.51', 'port' => '80' }, 'Common::AddressPort' ), bless( { 'address
+' => '/Common/10.116.38.52', 'port' => '80' }, 'Common::AddressPort' 
+) ], 'Common::AddressPort[]' );
@memberobjectstatus =
@ $VAR2 = bless( [ bless( { 'availability_status' => 'AVAILABILITY_STA
+TUS_GREEN', 'status_description' => 'Pool member is available', 'enab
+led_status' => 'ENABLED_STATUS_ENABLED' }, 'LocalLB::ObjectStatus' ),
+ bless( { 'availability_status' => 'AVAILABILITY_STATUS_GREEN', 'stat
+us_description' => 'Pool member is available', 'enabled_status' => 'E
+NABLED_STATUS_ENABLED' }, 'LocalLB::ObjectStatus' ) ], 'LocalLB::Obje
+ctStatus[]' );

[download]
VAR1 = 2; I am not sure what I am doing worng here. I need @status which to have all the data so that I can sort out keys and print address, port,availability. 
Like this
$VAR1 = bless( [ bless( { 'member' => bless( { 'address' => '192.150.1
+6.166', 'port' => '80' }, 'Common::IPPortDefinition' ), 'state' => 'S
+TATE_ENABLED' }, 'GlobalLB::PoolMember::MemberEnabledState' ) ], 'Glo
+balLB::PoolMember::MemberEnabledState[]' );

[download]

In reply to Complicated datastructre and after merging giving numeric value need help!! by nramya82

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.