Help for this page

Select Code to Download

Select or download this

use Modern::Perl;
use Data::Dump qw /dump/;
my %hash;
...
aixFsFree.10 = 0
aixFsFree.11 = 3463
aixFsFree.12 = 3463

Select or download this

{
  aixFsFree       => [undef, 2631, 3232, 2373, 1923, 46, 127, 0, 3000,
+ 3071, 0, 3463, 3463],
  aixFsMountPoint => [
...
                     ],
  aixFsSize       => [undef, 3072, 8512, 10240, 4096, 64, 128, 0, 4096
+, 3072, 0, 7168, 7168],
}