Select Code to Download

#!/usr/bin/perl

...
} else {
    warn "No numeric data\n";
}

# pipe data from some other process:

...
# or read data from some file:

getavg matrix.file