diff options
| author | LoneWolfiNTj <Hatley.Software@gmail.com> | 2023-02-02 22:55:52 -0800 |
|---|---|---|
| committer | LoneWolfiNTj <Hatley.Software@gmail.com> | 2023-02-02 22:55:52 -0800 |
| commit | 5f2cd32adbdb5fc2507b9e0b0ee4b6400da8c748 (patch) | |
| tree | 17aa8b0739ce0f3866949ee21e7c0f4b90a05b6a | |
| parent | 9403de466be140cbd3266df7c1cb9088a54bf90d (diff) | |
| download | perlweeklychallenge-club-5f2cd32adbdb5fc2507b9e0b0ee4b6400da8c748.tar.gz perlweeklychallenge-club-5f2cd32adbdb5fc2507b9e0b0ee4b6400da8c748.tar.bz2 perlweeklychallenge-club-5f2cd32adbdb5fc2507b9e0b0ee4b6400da8c748.zip | |
Removed excess "my" from ch-2.pl
| -rwxr-xr-x | challenge-202/robbie-hatley/perl/ch-2.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-202/robbie-hatley/perl/ch-2.pl b/challenge-202/robbie-hatley/perl/ch-2.pl index 2c021accaa..7fd591ddb9 100755 --- a/challenge-202/robbie-hatley/perl/ch-2.pl +++ b/challenge-202/robbie-hatley/perl/ch-2.pl @@ -62,7 +62,7 @@ for (@arrays){ # For each elevation change, decide what to do, based valley-wall state # and on whether we've reached the last elevation yet: - for ( my $idx = 1 ; $idx <= $#array ; ++$idx ){ + for ( $idx = 1 ; $idx <= $#array ; ++$idx ){ # If we're on the Left Wall of our current valley, check to see if we # just transitioned to the Right Wall: @@ -108,4 +108,4 @@ for (@arrays){ # Print results: say ''; say "Array of elevations = (@array)"; - say "Left-most widest valley = (@valley)"}
\ No newline at end of file + say "Left-most widest valley = (@valley)"} |
