Help for this page

Select Code to Download


  1. or download this
    sub refaddr($) {
  my $pkg = ref($_[0]) or return undef;
...
  bless $_[0], $pkg;
  $i;
}
  2. or download this
    use DynaLoader;                # disable XS loading
sub DynaLoader::bootstrap {1}  # thanks, demerphq
...
__END__
HASH(0x804b3f8)
HASH=HASH(0x804b3f8)