Hi all,

 

I have to use complex types to create a webservice  returning multiple fields from multiple records

 

Here is my sample code :

 

my @F = ();

 

my $f1 = Foo ->new({

    FieldName => 'Name1',

    FieldValue => 'Value1'

});

push @F, $f1->as_raw_data;

….

push @F, $f2->as_raw_data;

….

push @F, $fn->as_raw_data;

….

 

 

my @r =();

my $r1 = Bar->new({

    Comment  => 'string comment',

    Fields  => [EMAIL PROTECTED],

   

});

push @r, $r1->as_raw_data;

 

 

I can’t get more than the last field into my Bar object !

Any hints, tips, or suggestions would be appreciated.

_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to