diff options
| author | Abigail <abigail@abigail.be> | 2020-10-03 18:00:30 +0200 |
|---|---|---|
| committer | Abigail <abigail@abigail.be> | 2020-10-03 18:00:30 +0200 |
| commit | a19e1fe614f7a3caef487fda4c130cda89085891 (patch) | |
| tree | 049146e4bac080f9018d69132172b1caa22f56a8 | |
| parent | 83c8dff82ad8b61994f2d7a8891799a0ccf19295 (diff) | |
| download | perlweeklychallenge-club-a19e1fe614f7a3caef487fda4c130cda89085891.tar.gz perlweeklychallenge-club-a19e1fe614f7a3caef487fda4c130cda89085891.tar.bz2 perlweeklychallenge-club-a19e1fe614f7a3caef487fda4c130cda89085891.zip | |
Save a few bytes.
| -rw-r--r-- | challenge-080/abigail/perl/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-080/abigail/perl/ch-2.pl b/challenge-080/abigail/perl/ch-2.pl index 20f131e101..325ff17c73 100644 --- a/challenge-080/abigail/perl/ch-2.pl +++ b/challenge-080/abigail/perl/ch-2.pl @@ -52,7 +52,7 @@ while (<>) { # in an array @N. Initialize the number of candies to the number # of candidates. # - my $candies = my @N = split ' '; + my $candies = my @N = split; # # Add a candy of each pair of consecutive candidates with different |