From 84c870f9118f4af7d02aacdc1687eefc763399b2 Mon Sep 17 00:00:00 2001
From: Andrey Pazychev <anp135@yandex.ru>
Date: Wed, 20 May 2020 22:18:57 +0300
Subject: [PATCH] Raisecom. HW regexp bugfix

---
 lib/SNMP/Info/Layer3/Raisecom.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/SNMP/Info/Layer3/Raisecom.pm b/lib/SNMP/Info/Layer3/Raisecom.pm
index 5565671a..b87da255 100755
--- a/lib/SNMP/Info/Layer3/Raisecom.pm
+++ b/lib/SNMP/Info/Layer3/Raisecom.pm
@@ -100,8 +100,8 @@ sub main {
 
     #All another known ways to HW
     while (not defined($hw)) {
-        $hw = $obj->hw_oid_8886_6_140;
-        $hw =~ s/.*\s[v,V]ersion\s(.*)/$1/ if defined $1;
+        $obj->hw_oid_8886_6_140 =~ /.*[v,V]ersion\s+(.*)/;
+        $hw = $1 if defined $1;
         last;
     }