Printing an aligned data table in Perl using array of hashes and split function

See more:

Perl

Hi Guys,
I'm little struggling to get my program work as I'm a beginner in Perl. I'm writing a program in Perl to print a data table in console (with header and row alignment). For that after couple of days of research I found that, that could be done by reading the data txt file and creating a loop with array of hashes to print the headers and rows of the table. By also inserting a split function by a tab delimiter. The table would actually print with alignment without any table module installed. This is my code:

#!/bin/env perl
use strict;
use warnings;
use autodie;
use Data::Dumper;

# Create a file handle for the input file
my $filename = 'c73p1avfusevrmtop.txt';
open(my $fh, '<:encoding(UTF-8)', $filename);

# print header
my $header = readline $fh;
print $header;             #

# print rows
while (my $row = readline $fh) {
    chomp $row;
    print "$row\n";
}

This is the data txt table:

Type        Name                    Rev Id      ZZZ ID      IP Group        Date Released       AA Category Project IDs
xxxxxComponent  xyz_abc_1234LDO_c7rp1avrusevrmdtop  xxxx_2_5    99ccccc1    ABC RIP xxxxx   2015-05-03 6:59:09  xxxx
xxxxxComponent  xyz_abc_1234LDO_c7rp1avrusevrmdtop  xxxx_2_5    99ccccc1    ABC RIP xxxxx   2015-05-03 6:59:09  xxxx
xxxxxComponent  xyz_abc_1234LDO_c7rp1avrusevrmdtop  xxxx_2_5    99ccccc1    ABC RIP xxxxx   2015-05-03 6:59:09  xxxx

How do I write the array of hashes and split function to print this table with alignment. Any ideas, tips, help will be greatly appreciated?