Select Code to Download

$ perl -nlae "$t+=$F[2]; END{print $t/$.}" *

use strict;
use warnings;
...
# Find any file in a directory named "data", for example
# (and its subdirectories)
find(\&process_file, 'data');