my $merged_name_age=Text::Table->new("\tAGES OF CLASSES",""); $merged_name_age->add($table_51->select(0,1),$table_53->select(0,1)); print $merged_name_age; #OUTPUT: AGES OF CLASSES NAME AGE NAME AGE ----- --- ----- --- Chiilak 17 Bith 12 Blistmok 14 Lylek Acklay 10 Massiff 13 Zuxo