如何将数组中的行变成列

菜鸟请教一个问题：
我需要对一个数组的列进行操作，但是我读进来是默认的都是以行为单位的，怎么转换啊？
#!/usr/bin/perl -w
use strict;
use warnings;
my $a;
my @b;
open(ACA,"signal.txt") or die "Canot open the signal.txt\n";
while(<ACA>){
        chomp;
        $a=<ACA>;
        push (@b,$a);
        如何将行改成列
}
close ACA;


请指教*_*

这个不是要push进数组后再转换行和列，而是要转换后再push，或者说可以边转换边push。