find $SPOOL/open -type f -printf "%P\n" | sort -n | while read note ; do
subject=$(head -1 $SPOOL/open/$note)
date=$(stat -c '%y' $SPOOL/open/$note | cut -f1 -d' ')
- printf '%*s %s %s\n' $len $note "$date" "$subject"
+ owner=$(stat -c '%U' $SPOOL/open/$note)
+ printf '%*s %8s %s %s\n' $len $note $owner "$date" "$subject"
done
;;
ack)