Mega Code Archive

 

Categories / Perl / String

 

Crypt a string

$text = "Hello"; $encrypted = crypt $text, "AB"; print $encrypted;