Adds mail-archive

diff --git a/mail-archive b/mail-archive
new file mode 100755 (executable)
index 0000000..acae30c
--- /dev/null
+++ b/mail-archive
@@ -0,0 +1,16 @@
+#!/bin/bash
+#
+# Simple mail archiving tool.
+#
+
+# Setup.
+year="`date +%Y`"
+mkdir -p ~/mail/ZNBOX.$year/
+
+# Archive mail.
+mv ~/mail/INBOX.* ~/mail/ZNBOX.$year/
+
+# Start with a fresh folder structure.
+for folder in `ls -1 ~/mail/ZNBOX.$year/ | grep INBOX.`; do
+  mkdir -p ~/mail/$folder/{cur,new,tmp}
+done