Hi,
How can I do a very simple neat tabbed printing? My code below
although already included tab (\t), it still doesn't
follow my 'order'.
use Data::Dumper;
my @aoa = (
[qw (GAL_up800.fasta 6 800 4.8)],
[qw (hm01g.fasta 18 2008 36.144)],
[qw (hm02r.fasta 9 1000 9)],
[qw (train_muscle.fasta 7 50 0.35 )],
);
#print Dumper \@aoa ;
foreach my $aref (@aoa) {
print "$aref->[0]\t\t $aref->[1]\t $aref->[2]\t $aref->[3]\n";
}
It doesn't print this format - especially the last line (the indentation starting from second column is not right):
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
What is the standard practice for simple neat-printing like this? Is there any module that does this job?