STDOUT にいくつかのコンテンツがあり、そのコンテンツを降下テーブルに配置する必要があります。
この種の要件を処理するPerlモジュールを誰かに提案できますか
事前に感謝します。小さな助けをいただければ幸いです。
ありがとう!アディティア
Text::Table
2つの異なる出力をText::ASCIITable
作成します。後者にはアウトラインがあります。CPANの周りにはもっとぶら下がっていると確信しています。また、レポートのフォーマットを目的とした、少し使用されているPerl機能のフォーマットもご覧ください。
CPAN から、 Text::Tableを使用できます。
STDOUT を既存のプログラムから別のものにパイプしてフォーマットしたいと仮定すると、printf を使用してこのようなことができます。
process.pl という perl スクリプトを作成します。
#/bin/perl
use strict;
while (<>) {
my $unformatted_input = $_;
# Assuming you want to split on spaces, adjust if it is in fixed format.
my @elements = split / +/, $unformatted_input, 4;
# Printf format string, you can adjust lengths here. This would take
# an input of items in the elements array and make each file 10 characters
# See http://perldoc.perl.org/functions/sprintf.html for options
my $format_string='%10s%10s%10s%10s';
printf($format_string,@elements);
}
次に、STDOUT をこれにパイプすると、画面にフォーマットされます。
$ yourProcessThatDoesStdout | process.pl