[Perl 6] Creating a Bag.

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";