Run:
use strict;
use Mail::SRS;
my $SRS = Mail::SRS->new(
Secret => ["srs-bounce:xyzzy"],
MaxAge => [14],
);
my $addr = q{"\"press1 ibot\" <bounce"@press1.de};
print $SRS->forward($addr, 'bounce.com');
Get:
SRS0=zWml=ZS=press1.de="\"press1 ibot\" <bounce"@bounce.com
That's not a valid email address.
--
rjbs