diff --git a/Radius/Packet.pm b/Radius/Packet.pm index ff19cc7a0767d0691001d9e8d0a6452243dea9b5..746ebb5984152cd3ab8a96af38e51e55409d04df 100644 --- a/Radius/Packet.pm +++ b/Radius/Packet.pm @@ -570,7 +570,6 @@ sub unpack { { my $length = unpack "x C", $attrdat; my ($type, $value) = unpack "C x a${\($length-2)}", $attrdat; -print(STDERR "Type: $type, length: $length, value: ".unpack('H*',$value).", value: >$value<\n"); if ($type == $VSA) { # Vendor-Specific Attribute my ($vid) = unpack "N", $value; substr ($value, 0, 4) = "";