X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FAGWMsg.pm;h=69c63c1ef702423bd4a1d2df1aca0f8443dad531;hb=49a14209678e26e31b2a9c89aec330c1a7a87b80;hp=dbb8d8d2dfeeb4410a54aa73d4a42446f5b8de32;hpb=18a60dc227c9bc9926fd925e5219355fe2a80c98;p=spider.git diff --git a/perl/AGWMsg.pm b/perl/AGWMsg.pm index dbb8d8d2..69c63c1e 100644 --- a/perl/AGWMsg.pm +++ b/perl/AGWMsg.pm @@ -299,7 +299,7 @@ sub _decode my @lines = split /\cM/, $d; for (@lines) { - s/([\x00-\x1f\x7f-\xff])/sprintf("%%%02X", ord($1))/eg; +# s/([\x00-\x1f\x7f-\xff])/sprintf("%%%02X", ord($1))/eg; dbg("AGW Monitor port: $port \"$_\"") if isdbg('agw'); } } elsif ($sort eq 'C') {