# New Ticket Created by  "Kamil Kułaga" 
# Please include the string:  [perl #64886]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=64886 >


$ cat normal.pl; ./perl6 normal.pl
for (1..5){
say "b";
}
b
b
b
b
b

$ cat destroyer.p6; ./perl6 destroyer.p6
say "start";
my $flag=0;

for (1..10000000000){
say "never executed";
}
say "end";
start
end

$ ./perl6 --version
This is Rakudo Perl 6, revision 38208 built on parrot 1.0.0-devel
for i486-linux-gnu-thread-multi.

Copyright 2006-2008, The Perl Foundation.


updated a while ago

-- 
Pozdrawiam

Reply via email to