Select Code to Download

[root@www mail]# cat reader.pl
#!/usr/bin/perl
...
[root@www mail]# ./reader.pl virtusertable.db
  @blech.com.au => blech.com.au
  [snip]

tie %hash, 'DB_File', $file, O_RDONLY, 0666, $DB_HASH