RFC-822 parser in Perl ?

[Christophe Wolfhugel <Christophe . Wolfhugel @ grasp . insa-lyon . fr>]

Is there a real RFC-822 parser out there, by real I mean
a parser which would respect the syntax, and particularly quoted strings
and pairs.

I mean:

"stupid (yeah) user"@relay.host (comment)

should give

local part = "stupid (yeah) user"
host = relay.host
comment = com,ment

Yeah those addresses you only see twice in your life (generally really
close from an X.400 gateway :)).

-- 
Christophe Wolfhugel    |    Email: Christophe.Wolfhugel@grasp.insa-lyon.fr