Select Code to Download

#!/usr/bin/perl
use warnings;
...
}

print above_mean(@list_of_numbers);

Use of uninitialized value $a in numeric gt (>) at main.pl line 16.