RTM patch for long device name

--- scripts/min/usage.pl    2013-03-02 22:17:43.191932833 +0100
+++ scripts/min/usage.pl    2013-03-02 22:17:20.663610107 +0100
@@ -118,8 +118,13 @@
 sub get_hdd_usage {
     my %hdd_usage = ();
     my @df = `df -l`;
+    my $buffer = '';
     foreach (@df){
-        if (/^(\/dev\/\S+)\s+(\d+)\s+(\d+)\s+(\d+)\s+(\S+)\s+(\S+)/i) {
+        if (/^\/dev\//) {
+            $buffer = '';
+        }
+        $buffer .= $_;
+        if ($buffer =~ /^(\/dev\/\S+)\s+(\d+)\s+(\d+)\s+(\d+)\s+(\S+)\s+(\S+)/im) {
             my $hdd_name = $1;
             my $hdd_usage = $5;
             my $hdd_mount = $6;
@@ -134,7 +139,11 @@
     # inodes
     @df = `df -li`;
     foreach (@df) {
-        if (/^(\/dev\/\S+)\s+(\d+)\s+(\d+)\s+(\d+)\s+(\S+)\s+(\S+)/i) {
+        if (/^\/dev\//) {
+            $buffer = '';
+        }
+        $buffer .= $_;
+        if ($buffer =~ /^(\/dev\/\S+)\s+(\d+)\s+(\d+)\s+(\d+)\s+(\S+)\s+(\S+)/im) {
             my $hdd_name = $1;
             my $hdd_usage = $5;
             $hdd_usage =~ s/%//;