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}
www.com | www.net | www.org
No recent polls found