From b7421741804477259cf62e3d835b992bb0af691f Mon Sep 17 00:00:00 2001
From: Jakov Curic <jcuric@realtime.hr>
Date: Mon, 26 Sep 2011 12:16:32 +0200
Subject: [PATCH] extract mac address

---
 lib/H1/Davolink.pm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/lib/H1/Davolink.pm b/lib/H1/Davolink.pm
index 4624e5d..93c94bb 100644
--- a/lib/H1/Davolink.pm
+++ b/lib/H1/Davolink.pm
@@ -28,7 +28,13 @@ sub info {
 			warn "#S $line\n";
 		}
 	}
-
+        foreach my $line ( $telnet->cmd("ifconfig br0") ) {
+		chomp $line;
+		if ($line=~/^br0.*/) {
+			my ($mac) = ($line=~/^br0.*HWaddr\s(.*)$/);
+			$rec->{"MAC"} = $mac;
+		}
+	}
 	return $rec;
 }
 
-- 
2.20.1