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
|
package DDP;
use strict;
use warnings;
use Data::Printer;
BEGIN {
push our @ISA, 'Data::Printer';
our $VERSION = '1.002001';
$VERSION = eval $VERSION;
}
1;
__END__
=head1 NAME
DDP - Data::Printer shortcut for faster debugging
=head1 SYNOPSIS
use DDP; p $my_data;
=head1 DESCRIPTION
Tired of typing C<use Data::Printer> every time? C<DDP> lets you quickly call
your favorite variable dumper!
It behaves exactly like L<Data::Printer> - it is, indeed, just an alias to it :)
Happy debugging!
=head1 SEE ALSO
L<Data::Printer>
|
