Current Path :
/
usr
/
local
/
share
/
perl5
/
Module
/
Build
/
Or
Select Your Path :
Upload File :
New :
File
Dir
//usr/local/share/perl5/Module/Build/Dumper.pm
package Module::Build::Dumper; use strict; use warnings; our $VERSION = '0.4229'; # 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)->Sortkeys(1)->Dump() . '$x; }') } 1;
