From bda1fcd4d81eff7bedc8505e3ff709a5092e7adf Mon Sep 17 00:00:00 2001
From: Slaven Rezic <
[email protected]>
Date: Thu, 9 Jan 2020 09:23:16 +0100
Subject: [PATCH] RT #93079: more diagnostics
---
MemInfo.pm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/MemInfo.pm b/MemInfo.pm
index e076519..a1d17d8 100644
--- a/MemInfo.pm
+++ b/MemInfo.pm
@@ -33,7 +33,7 @@ our $VERSION = '0.03';
sub get_mem_info() {
my %mem;
- open(INFIL,"/proc/meminfo") || die("Unable To Open /proc/meminfo\n");
+ open(INFIL,"/proc/meminfo") || die("Unable To Open /proc/meminfo: $!");
NXTMI: foreach(<INFIL>) {
if( m/^Mem:\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ ) {
$mem{mem_total} = $1;
--
2.7.4
