calculate [qw/min max sum/], @list;
print List::Util::lastrun->max, "\n";