Select Code to Download

sub saveVolumes {

...
    print "volumes: $volInfo->{volumes}{0}, $volInfo->{volumes}\n";
    # more stuff here
}

$VAR1 = {
          'volumes' => 'none',
...
volumes: 0 1, none
value: 0 1
value: 0 1 2 3