--- a/exigrey.pl Wed Jan 03 11:57:47 2007 +0000
+++ b/exigrey.pl Wed Jan 03 12:04:26 2007 +0000
@@ -135,7 +135,8 @@
$/ = "\0";
delete $h{$_} while <$tmp>;
- print "$. items deleted from $db\n";
+ printf "$. items %s from $db\n",
+ $opt_purge ? "purged" : "deleted";
close($tmp);