Select Code to Download

use strict;
use warnings;
...
my @userArray = <STDIN>;
my $sum = sum(@userArray);
print "Sum $sum\n";