Help for this page
sub seq{!grep{$_[0]!~/\G.*?$_/g}split//,pop}
sub seq{ my @x=split"",pop; my $s=pop; ... } $c = ($cy, $c)[ $cy < $c ]; }
sub seq{!grep$_[0]!~/$_/g,pop=~/./g}
sub seq{!grep$_[0]!~/\Q$_/g,pop=~/./gs}
0 1 2 3 4 5 6 7
Results (595 votes), past polls