Select Code to Download

use strict;
use warnings;
...
my $checksum = sum( @odd ) * 3 + sum( @even );

print $checksum, "\n";