perl - Is there a module which gives me an output of two colums ( or more ) on STDOUT? -
Is there a module that gives me the output of two columns (or more) on STDOUT?
#! Use / usr / bin / env perl warnings; Strict use; Printf "% 0.3d \ n", for $ 1.1 .. 100;
I have to make 1-50 in the first column and 51-100 in the second.
Use text: column qw (format_array_table); Print Format_Are_Table ([Map [$ _, 50 + $ _], 1..50], [6, 6], [QW (First Second)]);
Or, if you are on a Unix system, then through pipes.
Open column, '| - ', QW (PR-T2); Print Column "$ _ \ n" for 1..100;
Comments
Post a Comment