283 #2
use Test;
sub validate(@values) {
my %counters = @values.classify(*.self);
for %counters.values {
$_ = .elems
}
for @values.kv -> UInt $i, UInt $v {
return False unless $v == %counters{$i}
}
True
}
ok (1, 2, 1, 0).&validate;
ok !(0, 3, 0).&validate;
INFO