Just another update

2015-02-20 00:35:01 -05:00 · 2015-02-20 00:35:01 -05:00 · 00a190b0a6
commit 00a190b0a6
parent a25938f123
6591 changed files with 94363 additions and 23227 deletions
--- a/Task/Evolutionary-algorithm/Perl-6/evolutionary-algorithm.pl6
+++ b/Task/Evolutionary-algorithm/Perl-6/evolutionary-algorithm.pl6
@ -10,4 +10,4 @@ loop (
    my $parent = alphabet.roll(target.chars).join;
    $parent ne target;
    $parent = max :by(&fitness), mutate($parent) xx C
-) { printf "%6d: '%s'\n", (state $)++, $parent }
+) { printf "%6d: '%s'\n", $++, $parent }