You can split your out putput based on the delimiter and I hope its spaces in your case (shown as \s+ below). And print these one by one giving a tab (shown as \t) between the columns. This should provide you with some basic alignment.

foreach my $line(@query_output)
{
my ($comp_id,$comp_info)=split(/\s+/,<$line>);
print "$comp_id\t$comp_info\n";
}
[download]

Hope it would of some help.
cheers, Syntex would be this: my ($comp_id,$comp_info)=split(/\s+/,$line);