#!/usr/bin/perl

@nums = ();
for(0..$#nums)
{
$sum += $_;
}
$size = $#nums;
$average = $sum / $size;
print "$average";