in reply to Abbreviate english words

Without commenting on the rest of the code, I'd just like to point out that your while loop control is better written as:

    while (local $_ = shift) {...}

Without the local, you will be stepping on your parent's $_.

Cheers,
Ovid

New address of my CGI Course.

Replies are listed 'Best First'.
Re^2: Abbreviate english words
by GrandFather (Saint) on Jun 09, 2005 at 00:07 UTC
    Ta. I did mean to put a "baby language Perl" warning in the description!

    Perl is Huffman encoded by design.

      No worries. We all have to start somewhere. I actually thought that was rather interesting snippet of code. Welcome to Perl!

      Cheers,
      Ovid

      New address of my CGI Course.

      Wow! Babies from a GrandFather ;-)