Michael Gale wrote:
> Hello,

Hello,

>     I have setup a hash like the following:
> 
> my $test;
> 
> $test->{$setup}->{'opt'} = "OK";

Or:

my $test = { $setup => { opt => 'OK' } };

> It works fine, now I want to save an array to the hash:
> 
> my @data;
> 
> push(@data,"test");
> 
> $test->{$setup}->{'data'} = @data;

That should be:

$test->{ $setup }{ data } = [ @data ];

Or:

@{ $test->{ $setup }{ data } } = @data;

> Now how do I use it in a for loop later in the script, I tried:
> 
> for(my $c=0; $c < $test->{$setup}->{'data'}; $c++) {

for ( my $c = 0; $c < @{ $test->{ $setup }{ data } }; $c++ ) {

>     print $test->{$setup}->{'data'}[$c];
> }

Or:

for my $item ( @{ $test->{ $setup }{ data } } ) {
    print $item;
}


John
-- 
use Perl;
program
fulfillment

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to