Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
# start with no existing giant.db file
...
store_fd($hashref, *DB) or die("store_fd: $!\n");
truncate(*DB, tell(*DB));
close(*DB);
  2. or download this
    perl -MStorable -MData::Dumper -e '{print Dumper(retrieve("giant.db"))
+}'