Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Bug recreated, you stopped just before the action

by Jeppe (Monk)
on Jan 31, 2011 at 08:45 UTC ( [id://885214]=note: print w/replies, xml ) Need Help??


in reply to Re^3: Interpreter eval counter out of bounds
in thread Interpreter eval counter out of bounds

Success! I've recreated the bug!
#!/opt/perl/bin/perl

use strict;
use warnings;

my $count = 0;

until ($@) {
  $count++;
  eval 'my $abc = 1; $abc++; ';
  unless ($count % 100000) {
    print $count . $/;
    print q(Expect crash) if $count > 999977609;
  }
}

print $@;
This produced:
....
1073700000 - Expect crash
Global symbol "$abc" requires explicit package name at (eval 1073741770) line 1.
So, there is a limit. This was run on perl 5.12.2, though the crashing system runs perl 5.8.9.

Replies are listed 'Best First'.
Re: Bug recreated, you stopped just before the action
by ikegami (Patriarch) on Feb 02, 2011 at 21:40 UTC

    It's pretty amazing how consistent this is, but that means it'll be easier to identify the bug. Could you please file a bug report using perlbug if you haven't already?

    [ It has since been filed as RT#83364. ]

      We will.
      --
      No matter how great and destructive your problems may seem now, remember, you've probably only seen the tip of them. [1]

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others avoiding work at the Monastery: (10)
As of 2024-03-28 12:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found