sub saveVolumes { my $volInfo = shift; # supposed to be hash reference (hash of hashes) print Dumper($volInfo); print "volumes: $volInfo->{volumes}{0}, $volInfo->{volumes}\n"; # more stuff here } #### $VAR1 = { 'volumes' => 'none', 'maxVolId' => 'none', 'isInternal' => 'true' }; volumes: 0 1, none value: 0 1 value: 0 1 2 3