diff options
author | 2010-09-24 14:48:16 +0000 | |
---|---|---|
committer | 2010-09-24 14:48:16 +0000 | |
commit | b39c515898423c8d899e35282f4b395f7cad3298 (patch) | |
tree | 1112fe0668df8904d89127dcb37234a401c97c42 /gnu/usr.bin/perl/cpan/Module-Build/lib/Module/Build/Dumper.pm | |
parent | use a better description for the vnd(4) entry on this file. (diff) | |
download | wireguard-openbsd-b39c515898423c8d899e35282f4b395f7cad3298.tar.xz wireguard-openbsd-b39c515898423c8d899e35282f4b395f7cad3298.zip |
Perl 5.12.2 from CPAN
Diffstat (limited to 'gnu/usr.bin/perl/cpan/Module-Build/lib/Module/Build/Dumper.pm')
-rw-r--r-- | gnu/usr.bin/perl/cpan/Module-Build/lib/Module/Build/Dumper.pm | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/gnu/usr.bin/perl/cpan/Module-Build/lib/Module/Build/Dumper.pm b/gnu/usr.bin/perl/cpan/Module-Build/lib/Module/Build/Dumper.pm new file mode 100644 index 00000000000..2a9bad1b637 --- /dev/null +++ b/gnu/usr.bin/perl/cpan/Module-Build/lib/Module/Build/Dumper.pm @@ -0,0 +1,19 @@ +package Module::Build::Dumper; +use strict; +use vars qw($VERSION); +$VERSION = '0.3603'; + +# This is just a split-out of a wrapper function to do Data::Dumper +# stuff "the right way". See: +# http://groups.google.com/group/perl.module.build/browse_thread/thread/c8065052b2e0d741 + +use Data::Dumper; + +sub _data_dump { + my ($self, $data) = @_; + return ("do{ my " + . Data::Dumper->new([$data],['x'])->Purity(1)->Terse(0)->Dump() + . '$x; }') +} + +1; |