use List::Util 'sum';
my $avg = @times ? sum(@times)/@times : "NaN";