#!/usr/bin/perl -w
use strict;
use sumfn;

my ($sum, $av) = sumarr(0, 1, 2, 3, 4, 5);
print "Sum = $sum, Average = $av\n";
