[aix-pm-cvs] modules/util/Util Monitoring.pm,1.2,1.3
Status: Alpha
Brought to you by:
gonter
|
From: Gerhard G. <go...@us...> - 2014-12-30 09:43:37
|
Update of /cvsroot/aix-pm/modules/util/Util In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv12081/modules/util/Util Modified Files: Monitoring.pm Log Message: debugging messages Index: Monitoring.pm =================================================================== RCS file: /cvsroot/aix-pm/modules/util/Util/Monitoring.pm,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** Monitoring.pm 25 Aug 2014 16:05:04 -0000 1.2 --- Monitoring.pm 30 Dec 2014 09:43:27 -0000 1.3 *************** *** 202,206 **** $filesystems->df('i'); # $filesystems->df('h'); ! # print "filesystems: ", Dumper ($filesystems); my $worst_status= -1; --- 202,206 ---- $filesystems->df('i'); # $filesystems->df('h'); ! print "filesystems: ", Dumper ($filesystems); my $worst_status= -1; *************** *** 209,215 **** my $now= time (); my $fs_hash= $filesystems->{'fs'}; foreach my $fs (keys %$fs_hash) { ! # print "fs=[$fs]\n"; my $x_fs= $fs_hash->{$fs}; # print "x_fs($fs): ", Dumper ($x_fs); --- 209,216 ---- my $now= time (); my $fs_hash= $filesystems->{'fs'}; + my %ro_fs; foreach my $fs (keys %$fs_hash) { ! print __LINE__, " fs=[$fs]\n"; my $x_fs= $fs_hash->{$fs}; # print "x_fs($fs): ", Dumper ($x_fs); |