What operating system are you attempting this on? Pretty much all modern OS's won't let you do this. Even in Pascal anymore.

The way to do this is via a device driver that sits in an elevated-privilege space (e.g., the kernel), and communicate with the driver instead.

win2k server or pro

No chance unless you wish to write a kernel mode driver that does that sort of stuff and talk to that from Perl. Once you've written the driver the talking to it is easy.

---

DWIM is Perl's answer to Gödel

You can get the memory location of a variable by doing something like this:

use strict;
use warnings;

my @var=(1,2,3);
my $var_ref=\@var;
print "$var_ref\n";
print 0+$var_ref . "\n";
[download]

This would give you output looking something like this:

ARRAY(0x182f26c)
25358956
[download]

I don't know of any way to write directly to a memory location. In fact, AFAIK, the actual hardware protects against such actions by generating (I think) a segmentation fault. I think you'd have to get down to the bare metal to do this. I agree, it's fun to trash your system, but they keep making it harder. Unless, of course, you use Windows.

$ sudo perl -we 'open my $mem, "+< /dev/mem"; seek $mem, 0xDEADBEEF, 0
+; print $mem "whatever" or die "Failed to write: $!"; close $mem';
[download]

PeekPoke

ArtMoney works fine with Crawl in W2K.