perl crypt.pl passwort file e