my $t = Text::Table->( qw( ID Name Source Type Assigment ) );
$t->load( [ 1, '...', '...', '...', '...' ],
          [ 2, '...', "NA\nEU", "Emp\nEx-emp", "Active\nInactive" ],
          [ 3, '...', '...', '...', '...' ] );
print $t;