Beefy Boxes and Bandwidth Generously Provided by pair Networks
Come for the quick hacks, stay for the epiphanies.
 
PerlMonks  

Re: Red Perl part I

by mpolo (Chaplain)
on May 01, 2004 at 13:41 UTC ( [id://349609] : note . print w/replies, xml ) Need Help??


in reply to Red Perl part I

Well, it doesn't "fail" per se for me, but I think that I am too thick to understand the output:

The hmneede

Using Fedora Core 1, perl 5.8.3. I just hit "download code" and ran it...

Replies are listed 'Best First'.
Re: Re: Red Perl part I
by ysth (Canon) on May 02, 2004 at 08:44 UTC
    That's strange; if you run it with warnings on, what do you see?

    What does this say?

    print join ":", map ord, split //, <DATA>;__DATA__ .W&fKq
      Here's the output under perl -w
      Argument "*" isn't numeric in array element at index.pl line 7, <DATA> + line 1. Argument "" isn't numeric in array element at index.pl line 7, <DATA> +line 1. Argument "" isn't numeric in array element at index.pl line 7, <DATA> +line 1. The hmneede
      The other code fragment prints 46:87:38:102:75:113:13:10
Re: Re: Red Perl part I
by ambrus (Abbot) on May 02, 2004 at 16:06 UTC

    That's exactly what it prints for me when I don't remove the control-m's. When removing them, the output seems ok. I'm on i686-linux, perl 5.8.1.