[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

[MacPerl] In search of a better rot13?

For various reasons I needed rot13 on my Mac.  Fairly simple to implement 
in MacPerl, but this is a bit prolix:

#!perl -wpl
tr/AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsTtUuVvWwXxYyZz/NnOoPpQqRrSsTtUuVvW
wXxYyZzAaBbCcDdEeFfGgHhIiJjKkLlMm/

My apologies for the line wrapping.

I use this as a "Perl Filter" in BBEdit. Better would be to reimplement 
the Unix 'caesar' command, which I note is on the 'to-do' list for the 
Perl Power Tools project.

--B


Brian McNett, Webmaster
*************************************************************
Mycoinfo. The world's first mycology e-journal.
http://www.mycoinfo.com/
*************************************************************


# ===== Want to unsubscribe from this list?
# ===== Send mail with body "unsubscribe" to macperl-request@macperl.org