[Perl 6] Creating a Bag.

Perl 6 |

0 B

None

0 👍

0 👎

Raw Download Clone Embed Print View

my $bag = (1, 1, 1, 1, 2, 2, 3, 3, 3, 4, 5, 5).Bag;
 
$bag.elems == 5 or die "Wrong element count";
$bag (cont) 1 or die "Wrong status";

Comments