diff options
| author | Daniel Mantovani <daniel@gmail.com> | 2020-09-24 17:39:26 -0300 |
|---|---|---|
| committer | Daniel Mantovani <daniel@gmail.com> | 2020-09-24 17:39:26 -0300 |
| commit | 1443fc43602aef0acc3f8e63b5407408d7ce5cd6 (patch) | |
| tree | e2a718bf42244ccb257d7bf097092bbfe2de923c | |
| parent | af7a319bc9cf2c23e3497672034a2e2e14fcc2cc (diff) | |
| download | perlweeklychallenge-club-1443fc43602aef0acc3f8e63b5407408d7ce5cd6.tar.gz perlweeklychallenge-club-1443fc43602aef0acc3f8e63b5407408d7ce5cd6.tar.bz2 perlweeklychallenge-club-1443fc43602aef0acc3f8e63b5407408d7ce5cd6.zip | |
solutions to challenge 079 - typo fixed
| -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/ /; |
