From: Jakov Curic <jcuric@realtime.hr>
Date: Mon, 26 Sep 2011 10:16:32 +0000 (+0200)
Subject: extract mac address
X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=b7421741804477259cf62e3d835b992bb0af691f;hp=5316ad9f6f660d1da23346c0ead94dce0d041ad1;p=APKPM.git

extract mac address
---

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;
 }