Perl probably doesn't ship with many choices, but there are tons available: Crypt:: (just to get you started).