fix nr_from_mac which regex change broke into more solid split and hex

diff --git a/lib/PXElator/kvm.pm b/lib/PXElator/kvm.pm
index 5cbc0bc..2582581 100644 (file)
--- a/lib/PXElator/kvm.pm
+++ b/lib/PXElator/kvm.pm
@@ -99,8 +99,9 @@ sub start {
 
 sub nr_from_mac {
        my $mac = shift;
-       $mac =~ s<^.+:([0-9a-f]{2})$><hex($1)>e;
-       $mac;
+       my $nr = (split(/:/,$mac,6))[-1];
+       $nr = hex($nr);
+       return $nr;
 }
 
 sub next_nr {