#!/bin/sh

TMPFILE=`mktemp`

cat > $TMPFILE

SUBJECT=`formail -x Subject < $TMPFILE`
NUMBER=`echo $SUBJECT | sed -e 's/^.*\[[^]0-9]*\([0-9]*\)\/[0-9]*\].*$/\1/'`
NEWNAME=`echo $SUBJECT | sed -e 's/\[[^]]*\]//g' | tr '" .:/[](){}<>$*=&' '-' | tr \' '-' |
        sed -e 's/^-*//' -e 's/--*/-/g' -e 's/-*$//' | tr 'A-Z' 'a-z' `.diff

echo Subject: "$SUBJECT" | sed -e 's/\[[^]]*\]//g' -e 's/  */ /g' > "$NEWNAME"
echo >> "$NEWNAME"
echo From: `formail -x From: < "$TMPFILE"` >> "$NEWNAME"
cat $TMPFILE | awk '
                                in_body         { print }
                                /^$/            { in_body = 1 }
                                ' >> "$NEWNAME"

rm $TMPFILE

echo "$NEWNAME # $NUMBER"