perl -w avg_routines.pl (+some way of specifying avg3()) <some_file_holding3numbers.txt >avg.txt