Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!swrinde!zaphod.mps.ohio-state.edu!sdd.hp.com!elroy.jpl.nasa.gov!jpl-devvax!lwall From: lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall) Newsgroups: comp.lang.perl Subject: Re: Uudecode in Perl? Message-ID: <9395@jpl-devvax.JPL.NASA.GOV> Date: 4 Sep 90 16:31:01 GMT References: <1043800001@ux1.cso.uiuc.edu> Reply-To: lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall) Organization: Jet Propulsion Laboratory, Pasadena, CA Lines: 26 In article <1043800001@ux1.cso.uiuc.edu> phil@ux1.cso.uiuc.edu writes: : ) While you are at it, I'd like to encourage you to include the capability : ) to encode and decode the XXencode format as well. XX is an alternative : ) to UU that uses a different character set that does not run into the : ) ambiguities of translation between IBM's EBCDIC character set and ASCII. : ) XXencode works where UUencode does (requiring and XXdecoder of course) : ) but also works in (non-UNIX) places that UU won't. : ) : ) XX uses the following character set: : ) : ) +-0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz : ) : ) representing the binary values from 0 to 63 in that order. By using : ) a string index you can convert a 6 bit value to a character. My C : ) implementation built an array of 256 bytes indexed by the arriving : ) character for the decoding process. All the rest of the format is : ) identical to the UUencode format. : ) : ) UUencode won't go away, but XXencode is starting to see some uses : ) among those in, or exchanging data with, IBM mainframes. tr/-+0-9A-Za-z/! "-_/; Sheesh. Larry