Revision as of 02:57, 4 April 2019 (view source) SqrtNegInf (talk \| contribs) (Added Perl 6 example) ← Older edit		Revision as of 02:59, 4 April 2019 (view source) SqrtNegInf (talk \| contribs) m (→‎{{header\|Perl 6}}: oops, language tag) Newer edit →
Line 1,299: =={{header\|Perl 6}}== {{trans\|Perl}} <lang ~~perl~~perl6>for (5, [2,1]), (5, []), (10, [8]), (5, [2,3]), (15, [2,3,2,3]) -> ($cells, @blocks) { say $cells, ' cells with blocks: ', @blocks ?? join ', ', @blocks !! '∅'; my $letter = 'A';

Nonoblock (view source)