Passwort-Codierung

[Barna]

Hi All

Wie kann man in Perl irgendein String Codieren (möglichst kompliziert)?
Nicht mit crypt();, denn ich möchte die Codierung auch Rückgängig machen können.

Danke,

bye