use strict;
use warnings;
my @vals = (
   [ "hello there",     9, 7, 42,   3.14159 ],
   [ "another string", 12, 9, 123, 69.123   ],
);
for my $r (@vals) {
   printf "%-20.20s %02d:%02d %5d %8.4f\n",
      $r->[0], $r->[1], $r->[2], $r->[3], $r->[4];
}

##</code><code>##

hello there          09:07    42   3.1416
another string       12:09   123  69.1230