printf s/$/ Average: %.1f/r,/ /*($v+=$'-((5<push@@,$')&&shift@@))/@@for<>