You think you do, but you really want a hash of arrays. Read perlreftut and then see perldsc.

OK. So I'm having some problems with dereferencing.
I am trying to iterate through the items with this..


foreach my $servers (@{$masterlist{$servtype}}){
print "Let's see $servers \n";
print RESULT " members $servers".":$serviceport\n";
}


When $servtype is explicitly defined it works fine, at least for that array. But when I put $servtype in there it doesn't work.
The $servtype variable has the same values as the array name. It SHOULD work but I must be dereferencing something improperly.

#! /usr/bin/env perl
use strict;
use warnings;

my %masterlist = (
    foo => [ 1, 2, 3, ],
    bar => [ 'a', 'b', 'c', ],
);

my $servtype = 'bar';

for my $servers (@{$masterlist{$servtype}}) {
    print "$servers\n";
}
[download]

Output:

a
b
c
[download]

Sorry I don't understand ... could you please elaborate what your problem is?

Cheers Rolf

I hadn't thought of that. Yeah that makes more sense. Thanks!

my %HoA=(
  too => [...],
  moo => [...],
  boo => [...],
);
my $i="boo"; 
my @foo=@{$HoA{$i}};
[download]