diff -r 528d92e5a04e -r b700c7f0dbbe greylist.pl --- a/greylist.pl Mon Jan 01 19:35:37 2007 +0000 +++ b/greylist.pl Mon Jan 01 22:20:03 2007 +0000 @@ -23,8 +23,9 @@ # ${perl{unseen}{$sender_host_address}{600}{seen.db}} # ${perl{unseen}{$sender_host_address}{600}{/some/dir/seen.db}} # -# record structure: item\0 timestamp(creation)\0 timestamp(usage)\0 -# (This way we're compatible with ${lookup{...}dbm{...}} +# record structure: key: item\0 +# value: timestamp(creation) timestamp(usage)\0 +# (This way we're compatible with ${lookup{...}dbm{...}}) sub unseen($;$$) { my ($item, $delay, $db) = @_; $item .= "\0";