Table / Boxes Generation in PERL

Hi all,
I was wondering, if there is any way to generate boxes/tables using perl to represent some data in better format.

input :

Name SAlary
pranav 10000
ajay 5000
shri 15000

output :

_________________________
|Name         |Salary            |
-----------------------------
|Pranav       |10000            |
|ajay          |5000              |
|shri           |15000             |
-----------------------------

This output is not good actually, i am just trying to show how the output should be.

I am looking for something like TABs / Boxes / Tables to present the data.

Hopefully this should get you rolling:

printf("|%20s|%20s|\n", "fleeb", "tong");

thanks for the suggestion sir, but i am not talking about formating the input when we print. Because the input data can vary dynamically.
I m talking about proper table generation.

something like HTML tabs.

is there any CPAN which we can use to automatically generate tables or boxes, like ANSIColor which we use to format coloring options of data.

If it's for general-purpose data, does it need to be perl? Linux often has the column utility for instance...