Select Code to Download

#!/usr/bin/perl
use strict; use warnings; use 5.014;
...
    my $n   = $col[5];
    return ($key, $avg, $n);
}