diff options
| -rw-r--r-- | challenge-079/daniel-mantovani/perl/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-079/daniel-mantovani/perl/ch-2.pl b/challenge-079/daniel-mantovani/perl/ch-2.pl index 5dd81f4819..65843842d0 100644 --- a/challenge-079/daniel-mantovani/perl/ch-2.pl +++ b/challenge-079/daniel-mantovani/perl/ch-2.pl @@ -55,7 +55,7 @@ for my $r (reverse 1 .. $max) { while ($line =~ s/#(\s+)#/'#'. 'W' x length($1) . '#'/e) { } # units this row can trap is the amount of "W"s we have on it -# feel free to change the tranaliteration operator to tr/W/W/ +# feel free to change the transliteration operator to tr/W/W/ # to keep an indication of the allocated water units $acc_water += $line =~ tr/W/ /; |