#!/usr/bin/perl

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