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