diff options
| -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 |