use Data::Dumper;
use B::Deparse;
use Devel::Size qw(size total_size);
use B::Concise;
use Devel::Peek;
my $deparse = B::Deparse->new();
print $deparse->coderef2text(*Win32::LoadLibrary{CODE});
print "\n\n".size(\&Win32::LoadLibrary )."\n\n";
my $walker = B::Concise::compile('-src','-exec',*Win32::LoadLibrary);
$walker->();
Dump(*Win32::LoadLibrary{CODE});