#!/usr/bin/perl
use strict;
use warnings;

require 'lib.pl';

my @userArray = <STDIN>;

my $sum = calcsum(my $funcSum);

print "Sum $sum\n";