Révision b6f9a54a
Remove trailing spaces and make some esthetic cleaning
| plugins/disk/du-2 | ||
|---|---|---|
| 113 | 113 |
if ($foo =~ m/(\d+)\s+(.+)/) {
|
| 114 | 114 |
my ($field, $value) = ($2, $1); |
| 115 | 115 |
clean_path(\$field); |
| 116 |
print $field, ".value ", $value, "\n";
|
|
| 116 |
print $field, ".value ", $value, "\n"; |
|
| 117 | 117 |
} |
| 118 | 118 |
} |
| 119 | 119 |
close(FILE); |
| ... | ... | |
| 121 | 121 |
|
| 122 | 122 |
# |
| 123 | 123 |
## |
| 124 |
### PUBLiC FONCTiONS
|
|
| 124 |
### PUBLIC FONCTIONS
|
|
| 125 | 125 |
############################################################################### |
| 126 | 126 |
## Used to create the fork |
| 127 | 127 |
sub daemonize {
|
| ... | ... | |
| 149 | 149 |
} |
| 150 | 150 |
} ## clean_path |
| 151 | 151 |
|
| 152 |
## Do you really need I told you what this function is going to check ?
|
|
| 152 |
## Do you really need I told you what this functions are going to check ?
|
|
| 153 | 153 |
sub cache_is_too_old {
|
| 154 | 154 |
return 1 if (! -e $TIMEFILE); |
| 155 | 155 |
my ($time) = `cat $TIMEFILE`; |
| ... | ... | |
| 162 | 162 |
return 0 if (-e $LOCKFILE); |
| 163 | 163 |
return 1; |
| 164 | 164 |
} |
| 165 |
|
|
| 165 | 166 |
sub munin_exit_done {
|
| 166 | 167 |
__munin_exit(0); |
| 167 | 168 |
} ## sub munin_exit_done |
| 168 | 169 |
|
| 169 |
|
|
| 170 | 170 |
sub munin_exit_fail {
|
| 171 | 171 |
__munin_exit(1); |
| 172 | 172 |
} ## sub munin_exit_fail |
| 173 | 173 |
|
| 174 | 174 |
# |
| 175 | 175 |
## |
| 176 |
### iNTERNALS FONCTiONS
|
|
| 176 |
### INTERNALS FONCTIONS
|
|
| 177 | 177 |
############################################################################### |
| 178 | 178 |
sub __munin_exit {
|
| 179 | 179 |
my $exitcode = shift; |
Formats disponibles : Unified diff