$text = join '', "Average of column 3 for the last ",
                       scalar(@lines), " days: $average\n";