diff options
| author | robbie-hatley <Robbie.Hatley@gmail.com> | 2024-03-22 14:41:45 -0700 |
|---|---|---|
| committer | robbie-hatley <Robbie.Hatley@gmail.com> | 2024-03-22 14:41:45 -0700 |
| commit | b3abf6f554be9dfce030a4aa1c1ec352b4bef44b (patch) | |
| tree | 95b5bb054b7f217658e481ebd3bbcfc1611b6052 /challenge-261 | |
| parent | dff3a8f8e00a2328d579b3e7f39b332fe0983624 (diff) | |
| download | perlweeklychallenge-club-b3abf6f554be9dfce030a4aa1c1ec352b4bef44b.tar.gz perlweeklychallenge-club-b3abf6f554be9dfce030a4aa1c1ec352b4bef44b.tar.bz2 perlweeklychallenge-club-b3abf6f554be9dfce030a4aa1c1ec352b4bef44b.zip | |
Correction to my solution to 261-2.
Diffstat (limited to 'challenge-261')
| -rwxr-xr-x | challenge-261/robbie-hatley/perl/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-261/robbie-hatley/perl/ch-2.pl b/challenge-261/robbie-hatley/perl/ch-2.pl index 46cd0190f6..fa349c4024 100755 --- a/challenge-261/robbie-hatley/perl/ch-2.pl +++ b/challenge-261/robbie-hatley/perl/ch-2.pl @@ -97,7 +97,7 @@ for my $aref (@arrays) { say ''; my @array = @$aref; my $start = pop @array; - say 'Array = (', join(', ', @$aref), ')'; + say 'Array = (', join(', ', @array), ')'; say 'Start = ', $start; if ( 0 == $start ) { say 'Error: $start may not be 0.'; |