Re: World's Largest JAPH

[Bart Lateur]

On Sun, 9 Sep 2001 12:18:22 +1000 , [EMAIL PROTECTED] wrote:

>  open 0;
>  $/ = undef;
>  $x = <0>;
>  close 0;
>  $x =~ tr/!-~/#/;
>  print $x;
>         '%'=~
>       ('('.'?'.
>     '{'.('`'|'%'
>  ).('['^'-').('`'
>  |'!').('`'|',').
...
I get 961 warnings "Useless use of a constant in void context at ...".
Oh, and the junk at the start of the output isn't nice either:

        ## #### ##
        #### ##
        ## # ######
        ## # ####
        ##### ##
        ## ## ##########
        ##### ###

-- 
        Bart.