Help for this page

Select Code to Download

Select or download this

sub get_long_at {
  my $addr=shift;
...
  printf "Got it\n";
  return unpack("L", $data);
}

Select or download this

MSVCRT! 77c4337c()
PERL58! Perl_sv_setpvn + 149 bytes
PERL58! Perl_unpackstring + 2264 bytes
...
PERL58! RunPerl + 134 bytes
PERL! 00401012()
KERNEL32! GetCurrentDirectoryW + 68 bytes