Select Code to Download

sub readClusterVolumes {

...
    print "vol: ", $volumesInfo{volumes}, ', ', $volumesInfo{volumes}{
+0}, ', ', $volumesInfo{volumes}{1}, "\n";
    return \%volumesInfo;
};

checkpoint 1:
$VAR1 = {};
...
          'isInternal' => 'false'
        };
vol: HASH(0x88d8144), 0 1 2 3 4, 0 1 2 3 4

checkpoint 1:
$VAR1 = {};
...
          'isInternal' => 'false'
        };
vol: none, 0 1 2 3 4, 0 1 2 3 4