1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
Author: Stephen Quinney <sjq@debian.org>
Description: This removes the dependency on Data::HexDump
Data::HexDump was being used exclusively for debugging purposes. It is
switched instead to using Data::Dumper (which is a core Perl module).
Reviewed-by: Italo Valcy <italo@dcc.ufba.br>, Jonathan Yu <jawnsy@cpan.org>
Last-Update: 2016-12-28
--- a/Radius.pm
+++ b/Radius.pm
@@ -24,7 +24,6 @@
use IO::Select;
use Digest::MD5;
use Data::Dumper;
-use Data::HexDump;
use Net::IP qw(ip_bintoip ip_compress_address ip_expand_address ip_iptobin);
use Time::HiRes qw(time);
@@ -225,7 +224,7 @@
if ($debug) {
print STDERR "Sending request:\n";
- print STDERR HexDump($data);
+ print STDERR Dumper($data);
}
my $res;
if (!defined($self->{'node_list_a'})) {
@@ -297,7 +296,7 @@
if ($debug) {
print STDERR "Received response:\n";
- print STDERR HexDump($data);
+ print STDERR Dumper($data);
}
if (defined($self->{'sock_list'})) {
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -14,7 +14,6 @@
'Digest::MD5' => 2.20,
'IO' => 1.12,
'Data::Dumper' => 1,
- 'Data::HexDump' => 0.02,
'Net::IP' => 1.26,
},
TEST_REQUIRES => {
|
