view release on metacpan or  search on metacpan

examples/twofish.pl  view on Meta::CPAN

#!/usr/bin/perl

# Please don't encrypt me!
# This space is left blank intentionally  
use Filter::CBC "Twofish","my secret key";
RandomIVg‘a‰#3Äðtè%_fUãÖ	
ì-£+Úò·•>tÞc<—0PMÏéoÐÙÄ1ѵšd£	.„¼ö1AÎ;—zD¿Š¬è`›-¢”îÏ	÷ëùY…í°c÷a¿û_ÃŽ#4‡¸¹!œàÌClªûŠøN<ÍUx]$·%¤°õgY/NAÆò‚[híAn`Rî
Ò