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>