develooper Front page | perl.perl5.porters | Postings from September 2012

[perl #114746] Re: Garbage content in diagnostic message (5.10.0, 5.16.1)

Thread Previous
From:
Father Chrysostomos via RT
Date:
September 4, 2012 18:24
Subject:
[perl #114746] Re: Garbage content in diagnostic message (5.10.0, 5.16.1)
Message ID:
rt-3.6.HEAD-11172-1346808260-981.114746-15-0@perl.org
On Tue Sep 04 13:27:16 2012, sdaoden wrote:
> Steffen "Daode" Nurpmeso <sdaoden@gmail.com> wrote:
>  |I see this on OS X Snow Leopard (5.10.0) and FreeBSD 9.0 (5.16.1).
>  [.]
>  |But if i run my program i get
>  |
>  |  Argument "G}|~^?^?^?~G__TEOU_FILTERS" isn't numeric in bitwise or \
>  |  (|) at /Users/steffen/arena/code.local/s-web42.git/s-web42 line \
>  |  197 (#1)
>  [.]
>  |and note that
>  |
>  |  |?0%0[steffen@sherwood s-web42.git]$ grep EOU s-web42 
>  |  |?1 <==> $?
>  |
>  |so that this seems to be a garbled mix of the two barewords above.
>  [.]
> 
> I've prepared a test tarball for you to try.  It's 26711 bytes,
> but i hope that's ok..  Simply unpack it somewhere (creates a
> subdir) and run ./runit.sh from therein, and i'm pretty sure you
> can reproduce the problem on your own.
> Please *note* that the s-web42 program is not read yet, it's just for
> you to test -- *thank you*.
> I'm not subscribed to any perl(1) list at the moment.

It appears that you are not loading the modules that provide the two
constants used on line 192 of s-web42:

      my $m = Filter::CONTENT_FILTERS | Ctx::MODE_STDOUT;

So they are being treated as strings.  I can get the same output like this:

$ perl -we 'warn +("Filter::CONTENT_FILTERS"|"Ctx::MODE_STDOUT")+1;'
Argument "G}|~^?^?^?~G__TEOU_FILTERS" isn't numeric in addition (+) at
-e line 1.
1 at -e line 1.

If you ‘use strict "subs"’, Perl will catch that mistake for you.

(I don’t know what these Filter and Ctx modules are.  Presumably some
local modules?)

-- 

Father Chrysostomos


---
via perlbug:  queue: perl5 status: new
https://rt.perl.org:443/rt3/Ticket/Display.html?id=114746

Thread Previous


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About