Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: pleac

From: krobillard:cox at: 11-Oct-2003 14:39

I followed a link off the Pleac site to the ROT13 implementation page ( The REBOL version posted there is unbelievably bad! It's so bad that I suspect it was sent in as a joke. I sent the webmaster the version below. I just hope the site is still being maintained. I'd hate for someone to think REBOL is so cumbersome. REBOL[] foreach c input [ cap: c and 32 c: c and complement cap if (c >= #"A") and (c <= #"Z") [ c: c - #"A" + 13 // 26 + #"A" ] prin to-char c or cap ] prin "^/" -Karl Robillard