CiviCRM Community Forums (archive)

I did change the script to work.
with the shortend reply emails from unsubscribe/optout to u/o
For example
2.0 was unsubscribe.1.366.144960.dc5be59b70bf2357@example.com
2.1 now is u.1.366.144960.dc5be59b70bf2357@example.com

the script just had to have 3 places changed
Line 303
unless ($to =~ m/^\s*<*"?(o|u|bounce|confirm|optout|reply|subscribe|unsubscribe|resubscribe)/i)

Line 415
elsif ($dest eq 'u')  # or an unsubscription

Line 490
elsif ($dest eq 'o')       # or an opt-out


----untested patch file below-------------
--- imap2soapnew 2008-09-29 10:38:23.000000000 -0400
+++ imap2soap.pl2.1 2008-09-29 11:00:24.000000000 -0400
@@ -300,7 +300,7 @@
         junk($imap, $msg, "No To: header in message $n");
         next;
       }
-    unless ($to =~ m/^\s*<*"?(bounce|confirm|optout|reply|subscribe|unsubscribe|resubscribe)/i)
+    unless ($to =~ m/^\s*<*"?(o|u|bounce|confirm|optout|reply|subscribe|unsubscribe|resubscribe)/i)
       {
         junk($imap, $msg, "Not a CiviMail message $n -- To: $to");
         next;
@@ -412,7 +412,7 @@
                 or fatal "Could not move to Failed";
             }
           }
-        elsif ($dest eq 'unsubscribe')  # or an unsubscription
+        elsif ($dest eq 'u')  # or an unsubscription
           {
             while (1) {
               $result =
@@ -487,7 +487,7 @@
                 or fatal "Could not move to Failed";
             }
           }
-        elsif ($dest eq 'optOut')       # or an opt-out
+        elsif ($dest eq 'o')       # or an opt-out
           {
             while (1) {
               $result =

I can test it today.