see inline comments:
> -----Original Message-----
> From: Tobin, Elliot [mailto:[EMAIL PROTECTED]]
> Sent: Friday, September 06, 2002 9:55 AM
> To: '[EMAIL PROTECTED]'
> Subject: Arrays inside
>
>
> I have the following as my data inside a package:
>
> my $dataBlock = { isInsertable => $isInsertable,
> fields => undef,
> requiredFields => undef,
> selectionFields => undef,
> returnFields => undef };
>
> How do I go about storing a list as the value of the
> $dataBlock->{'fields'}
> key?
>
> I'd like something like the following to work:
>
> sub setFields
> {
> my ($inBlock, @fieldList) = @_;
>
> foreach my $i (@fieldList)
> {
> push($inBlock->{'fields'}, $i);
push(@{$inBlock->{fields}}, $i);
> }
>
> return $inBlock;
> }
>
> I understand it won't because $inBlock->{'fields'} is not an
> array... Any
> help would is appreciated.
>
> TIA,
>
> EllioT
>
----------------------------------------------------------------------------
--------------------
The views and opinions expressed in this email message are the sender's
own, and do not necessarily represent the views and opinions of Summit
Systems Inc.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
