in reply to decrypt the string

crypt function doesn't encrypt, so you can't decrypt :)

In Section Seekers of Perl Wisdom