Select Code to Download

#!/usr/bin/perl

...
    }

print "Finished";

        ( $sums[ $j - $i ] += $_[ $j ] ) > $max and $max = $sums[ $j -
+ $i ];