Select Code to Download

Select or download this

host:volume              available(MB)   %free
Use of uninitialized value in subtraction (-) at freespace line 43.
...
149.153.130.23:/dev/hda2    84    90%
3  149.153.130.23:        100%
4  149.153.130.23:        100%

Select or download this

        @lines = map {
        /(\/\w+\/\w+)\s+\w+\s+\d+\s+\d+\s+(\d+)\s+(\d+)%/;
...
50      @lines = sort { $b->{available} <=> $a->{available} } @lines;

52      push @out, "$host:$_->{volume}    $_->{available}    $_->{free
+}%" for @lines;