From 2329fe260d3393c6bcbc868cb3f7a33d324b1910 Mon Sep 17 00:00:00 2001
From: Obfuscoder
Date: Fri, 17 Oct 2014 20:34:00 +0200
Subject: Fix perlcritic issues for all scripts starting with b,c,d

---
 scripts/df.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'scripts/df.pl')

diff --git a/scripts/df.pl b/scripts/df.pl
index 46b6672..8b4f086 100644
--- a/scripts/df.pl
+++ b/scripts/df.pl
@@ -76,7 +76,7 @@ sub getDiskInfo()
 	my @list;
 	my $skip_line_one = 1;
 
-	open(FID, "/bin/df -h|");
+	open(FID, "-|", "/bin/df");
 	while (<FID>)
 	{
 		if ($skip_line_one > 0)
-- 
cgit v1.2.3