Select Code to Download

#!/usr/bin/perl -w
use Text::Table;
...
my $tb = Text::Table->new();
$tb->load(@aoa);
print $tb;

GAL_up800.fasta     6  800  4.8  
hm01g.fasta        18 2008 36.144
hm02r.fasta         9 1000  9    
train_muscle.fasta  7   50  0.35