Port: fixes parsing dash or space tokens

This commit is contained in:
Jed Reynolds
2020-03-12 15:49:34 -07:00
parent e4f1a25a6c
commit 7317d9a4b6

View File

@@ -276,7 +276,7 @@ sub decode {
$i++;
$ln = $ta[$i];
if ( $ln =~ /\s+DNS Servers:\s+(.*)/ ) {
if ( $ln =~ /\s+DNS[ -]Servers:\s+(.*)/ ) {
$self->dns_servers($i);
$i++;
$ln = $ta[$i];
@@ -340,7 +340,7 @@ sub decode {
# MAC: 00:c0:95:e2:4c:0e DEV: eth5 MTU: 1500 TX Queue Len: 400
if ( $ln =~
/\s+MAC:\s+(\S+)\s+DEV:\s+(\S+)\s+MTU:\s+(\d+)\s+TX Queue Len:\s+(\d+)/
/\s+MAC:\s+(\S+)\s+DEV:\s+(\S+)\s+MTU:\s+(\d+)\s+TX[ -]Queue[ -]Len:\s+(\d+)/
)
{
$self->mac_addr($1);