http://qs321.pair.com?node_id=259219


in reply to perl rules

Honestly one of the beste JAPH's I've ever seen. How many years did it take you to write that?? :o.

Replies are listed 'Best First'.
Re: Re: perl rules
by tos (Deacon) on May 19, 2003 at 20:03 UTC
    Thank you :-) I'm pleased that you like it.

    In fact i worked on it a few hours. As Coruscate already remarked you can easily read the code by printing out $c. Then you can see a little playing with the, particulary left-value-, properties of substr.

    With the \r (carriage-return) i make sure that the output stays in the same line. In vain i looked for a possibility to switch of the cursor. (a Question to the monks)

    To make the code seeming "obfuscated" i dumped it with unix' od-command into a perl-scalar. With a little regexing i eleminated blanks and leeding zeros. Then i "casted" this string into a former with (the good old) vim created "mould".

    When i wanted to post it to the monastery i realized that it didn't fit into a <code>-region. Because it was to wide it was disfigured by newlines. Therefore i had to resize my "mould"-pattern and to reduce the code by shortening varnames, eliminating Blanks and removing the use strict/warning-pragmas.