Re: Re: Re: Re: (Golf) Cryptographer's Tool #1

[srawls]

Yes it does, but the this is straight from the specification:

Given: a word, and an 'alphabet' string (and to be exact about this latter part, each character in the word and the alphabet can be represented in 7 bits, eg the printable ASCII set).

The 15 year old, freshman programmer,
Stephen Rawls

[MeowChow]

Well, let's go pickin' nits... the latin abbreviation, "eg" means "for example". So according to the spec, any 7 bit ASCII character is possible; printable ASCII characters mearly represent examples of possible 7-bit characters. If, however, Masem had written "ie", which means "that is to say", then you would be correct.

/me ducks and covers...

   MeowChow                                   
               s aamecha.s a..a\u$&owag.print

[srawls]

Drats, I knew I should have taken latin : )

Just tack on 4 chars to my solution, \200 is the first 8 bit ASCII char, so that is what I'll have to use:

sub c {                             
($_,$a,%h)=@_;s!.!$h{$&}||=($a=~/./g,"$&\200")!sge;y/\200//d;$_
}

Update: Chipmunk seemed to think this needed to work : ) so it's fixed above, but doesn't come close to competing.

The 15 year old, freshman programmer,
Stephen Rawls