The following piece of code is just a snipet from a mailbomb sniffer
program that I cant seem to get functioning correctly, I dont get any
errors when I run it but I also get no output. I am able to run this
exact same piece of code on a Linux box using perl 5.00503 but not on a
Solaris box running the same version. I am baffled? Here's the code-
dbmopen(%access,'e:\test\access.db',0666);
while (($key,$val) = each %access) {
print $key, ' = ', unpack('L',$val), "\n";
}
dbmclose(%access);
--
Jamie Steffen
[EMAIL PROTECTED]
Web Administrator/CNS
CSG Systems, Inc.
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/activeperl
