Hi Joel,
Sunday, October 12, 2003, 2:36:46 PM, Joel wrote: > How about a slightly more REBOL-intensive variation? > rot13: func [s [string!]] [ > foreach char s [ > prin any [ > select/case "anabobcpcdqderefsfgtghuhivijwjkxklylmzm" char > select/case "AZABOBCPCDQDEREFSFGTGHUHIVIJWJKXKLYLMZM" char > char > ] > ] > prin newline > ] sorry the nit-picking, but i guess the first #"Z" in the second sequence should rather be an #"N" :) -- Best regards, Andreas -- To unsubscribe from this list, just send an email to [EMAIL PROTECTED] with unsubscribe as the subject.
