Re^4: Creating Multidimensional Hashed Arrays?

[spickles]

toolic -

You nailed it. I was reading the perl doc you linked for a couple of hours before posting, so I was on the right track. But decoding all of those parenthesis, brackets, commas, etc. can get confusing quickly. So now my question would be how to add a new vlan?

[Anonymous Monk]

to add a new vlan assuming vlan number is unique

unless (exists $vlan_nums{$new_num}){
$vlan_nums{$new_num}{name} = xyz;
....
}

If update is needed for the existing number you can add an else loop

[spickles]

The following code, taken from here, worked for me!

# Either build your data as a hashref
my $hashref = {
  username => someusername,
  etc => ...,
};

# or assign a reference to a hash
my %data = (username => someusername, etc => ...);
my $hashref = \%data;

# Then pass it off
my $valid = verify($hashref);
# You can also pass like so
my $valid = verify(\%data);

# Then, in your verify sub:

sub verify {
  my $ref = shift;
  
  # do something with your data
  $ref->{'username'} =~ /yourregex/;

  return $something;
}