diff options
| -rwxr-xr-x | challenge-160/alexander-pankoff/perl/ch-2.pl | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/challenge-160/alexander-pankoff/perl/ch-2.pl b/challenge-160/alexander-pankoff/perl/ch-2.pl index a444a887e4..782ab8efdb 100755 --- a/challenge-160/alexander-pankoff/perl/ch-2.pl +++ b/challenge-160/alexander-pankoff/perl/ch-2.pl @@ -47,9 +47,6 @@ sub equilibrium_index(@xs) { for my $i ( 0 .. $#xs ) { my $lower = sum0( @xs[ 0 .. $i - 1 ] ); my $upper = sum0( @xs[ $i + 1 .. $#xs ] ); - say $i; - say $lower; - say $upper; return $i if $lower == $upper; } |