[Imap-uw] Outlook deadlock

[Per Foreby]

On Wed, 19 Sep 2007, John Kelly wrote:

> You can't rely on users to clean house.
>
> Nightly, I purge all INBOX messages older than 40 days, other folders
> 120 days.  That keeps a clean house.
>
> It's a simple program using the cclient library.  I think I posted it
> some time ago.  It's free for the asking.

That's really tough! My users would hang me if I deleted anything. My 
solution is "spamming" the culprits.

I do however have a cron job to clean the Trash (using the small script 
included below). The users are informed about this cleanup.

/Per

#!/bin/sh

# Prune trash folders
#
# Per Foreby <perf at ddg.lth.se> 2007.

# Get time two weeks back as dd-mmm-yyyy
date=`perl -e '\
use POSIX qw(strftime);
$t = time() - (14 * 24 * 60 * 60);
print POSIX::strftime("%d-%b-%Y", localtime($t)), "\n";
'`

# Find Trash + outlook and outlook express versions in English and Swedish.
find /mail \
   \( \
     -name Trash \
       -o -name 'Deleted Messages' \
       -o -name 'Deleted Items' \
       -o -name Borttaget \
       -o -name 'Skr&AOQ-ppost' \
   \) \
   -print | \
while read fullpath; do
   mailutil prune "$fullpath" "before $date"
done