my @h ;
           tie @h, "DB_File", $filename, O_RDWR|O_CREAT, 0666, $DB_RECNO;
           # starting with something like...
           $h[512_000_000] = "orange";