In addition to what eyepopslikeamosquito already said and using the data presented, though the OP didn't show any. One can also look at these modules:

• Perl6::Form

  use Perl6::Form;
  
  my @vals = (
      [ "hello there",    9,  7, 42,  3.14159 ],
      [ "another string", 12, 9, 123, 69.123 ],
  );
  
  print form "Words      |Value1 |Value2 |Value3  |Value4";
  
  for my $r (@vals) {
      print form
        "{<<<<<<<<} |{||||} |{||||} |{|||||} |{]]]]]} ",
        $r->[0], $r->[1], $r->[2], $r->[3], $r->[4];
  }
  [download]

• Text::Table

      use Text::Table;
  
      my $tb =
        Text::Table->new( "Words", "Value1", "Value2", "Value3", "Value4
  +" );
  
      $tb->load(@vals);
  
      print $tb;
  [download]

You might have to look at the documentation of these modules.