Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
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 :)


Comment on Re: This code snippet causes Perl to SEGV
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://988891]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (9)
As of 2014-12-26 20:25 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (176 votes), past polls