# New Ticket Created by H. Merijn Brand # Please include the string: [perl #124059] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org/Ticket/Display.html?id=124059 >
$ perl6 -e'(1,4..7,9..Inf).perl.say'
(1, 4..7, 9..Inf)
$ perl6
-e'my@x=1;my$x=4;@x.push($x..7);$x=9;@x.push($x..Inf);@x.perl.say'
Cannot .push an infinite list
in block <unit> at -e:1
$ perl6
-e'my@x=1;my$x=4;@x.plan($x..7);$x=9;@x.plan($x..Inf);@x.perl.say'
-- time passes
^C
$ perl6 -e'my@x=1,2,3;@x.plan("a"..*);@x.perl.say'
-- time passes
^C
<TimToady> m: my @x = 1,2,3; @x.plan('a'..*); say @x
<camelia> rakudo-moar 076da8: OUTPUT«1 2 3 a b c d e f g h i j k l m n o p q r
s t u v w x y z aa ab ac ad ae af ag ah ai aj ak al am an ao ap aq ar as at au
av aw ax ay az ba bb bc bd be bf bg bh bi bj bk bl bm bn bo bp bq br bs bt bu
bv bw bx by bz ca cb cc cd ce cf cg ch ci cj ck cl cm cn …»
<TimToady> m: my @x = 1,2,3; @x.plan(7,8,9); @x.plan('a'..*); say @x
<camelia> rakudo-moar 076da8: OUTPUT«1 2 3 7 8 9 a b c d e f g h i j k l m n o
p q r s t u v w x y z aa ab ac ad ae af ag ah ai aj ak al am an ao ap aq ar as
at au av aw ax ay az ba bb bc bd be bf bg bh bi bj bk bl bm bn bo bp bq br bs
bt bu bv bw bx by bz ca cb cc cd ce cf cg ch ci cj ck cl …»
<TimToady> yeah, better RT that
--
H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/
using perl5.00307 .. 5.21 porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/ http://www.test-smoke.org/
http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/
pgpDhSyKEOvNo.pgp
Description: PGP signature
