So for column wise the words are not aligned with each other..
You could check Text::Table like so:

use warnings;
use strict;
use Text::Table;

my $table = Text::Table->new("Person1 ", " Person2");

  $table->load(
   ['boy ',' girl'],
   ['father ',' mother'],
   ['sister ',' brother'],
  );
  
  print $table;
[download]

Person1   Person2
boy       girl   
father    mother 
sister    brother
[download]