135/snmp-info
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

escaped all control characters, not just line feed

Browse Source
This commit is contained in:
Max Baker
2003-07-02 19:24:49 +00:00
parent 3d812e0eae
commit 39e618f761
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
t/test_class.pl
View File

@@ -85,7 +85,7 @@ sub test_global {
if ($@){ if ($@){
my $err = $@; my $err = $@;
$err =~ s/\n/ /g; $err =~ s/[[:cntrl:]]+/ /g;
printf "%-20s Blew up. $err\n",$method; printf "%-20s Blew up. $err\n",$method;
return 0; return 0;
} }
@@ -94,7 +94,7 @@ sub test_global {
printf "%-20s Does not exist.\n",$method; printf "%-20s Does not exist.\n",$method;
return 0; return 0;
} }
$value =~ s/\n/ /g; $value =~ s/[[:cntrl:]]+/ /g;
if (length $value > 60) { if (length $value > 60) {
$value = substr($value,0,60); $value = substr($value,0,60);
$value .= '...'; $value .= '...';