| # | Line 109 | Line 109 | sub include_disk() { | |
|---|---|---|
| 109 | my($partition_no) = 0; | |
| 110 | for (my($i) = 0; $i < $#df; $i++) { | |
| 111 | my($line) = $df[$i]; | |
| 112 | < | $line =~ /^(\/[^\s]*)\s*([0-9]*)\s*([0-9]*)\s*([0-9]*)\s*[^\s]*\s*(\/[^\s]*)\s*/; |
| 112 | > | $line =~ /^([^\s]*)\s*([0-9]*)\s*([0-9]*)\s*([0-9]*)\s*[^\s]*\s*(\/[^\s]*)\s*/; |
| 113 | # $4 will not match unless everything before it does... | |
| 114 | if (defined $5) { | |
| 115 | my ($filesystem, $kbytes, $used, $avail, $mount) = ($1, $2, $3, $4, $5); | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |