From 094c2d548d55a136ae862e1eab4ade0a438928e0 Mon Sep 17 00:00:00 2001 From: Max Baker <> Date: Tue, 2 Mar 2004 05:22:35 +0000 Subject: [PATCH] added device_type() debugging info. --- Info.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/Info.pm b/Info.pm index fa8ad14c..db09d531 100644 --- a/Info.pm +++ b/Info.pm @@ -630,7 +630,9 @@ sub device_type { # if we dont have sysServices, we dont have anything else either probably. return undef unless (defined $layers and length($layers)); - my $desc = $info->description(); + my $desc = $info->description() || 'undef'; + $desc =~ s/[\r\n\l]+/ /g; + $info->debug() and print "SNMP::Info::device_type() layers:$layers sysDescr: \"$desc\".\n"; # Layer 3 Supported # (usually has layer2 as well, so we check for 3 first)