Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re: This code snippet causes Perl to SEGV

by FunkyMonk (Canon)
on Aug 21, 2012 at 22:13 UTC ( #988891=note: print w/replies, xml ) Need Help??


in reply to This code snippet causes Perl to SEGV

Just to narrow the problem down a little, perl 5.10.1 also SEGVs, but 5.12.3 does not.

The code runs fine on Ubuntu & perl 5.10.1 if you remove the pre-declared prototype (sub foo();). You don't need prototypes. They very probably don't do whatever it is you think they do.

Update: This works for me on 5.10.1. Try it on your 5.10.0:

#!perl510 -w use strict; #sub foo(); foo(); sub foo() { # shouldn't use () but does no harm here my $foo; format STDOUT = ^ $foo; . $foo="X"; write; }

I've been doing a lot of Python recently. Semi-colons sure do look weird now :)

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://988891]
help
Chatterbox?
[erix]: Harakiri with a nuke on the white house, that'd clean up the staff there a bit too ;)
[erix]: (sorry, I'm always a bit violent on fridays)
LanX predicts problems for Erix next time he lines up at an US immigration counter
[erix]: but tuesdays just as bad
[erix]: thanks for the heads-up but that's a line-up studiiously avoided :P
[LanX]: yeah too far for someone who can't even make it to Amsterdam
LanX looking for a good magit tutorial
LanX ... and git in general
[erix]: I've been to Amsterdam before you were born
[LanX]: 1899?

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (12)
As of 2017-08-18 13:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Who is your favorite scientist and why?



























    Results (302 votes). Check out past polls.

    Notices?