时间:2010-07-25 04:30:11

标签: perl formatting

4 个答案:

答案 0 :(得分:16)

答案 1 :(得分:11)

答案 2 :(得分:4)

答案 3 :(得分:3)

以下是Perl6::Form的实例:

#!/usr/bin/perl

use Perl6::Form;

my @arr = (
    [1..8],
    [9..16],
    [17..24],
);

foreach my $line (@arr) {
    print form
        "{<<<<<} "x8,
        @{$line};
}

将输出:

1       2       3       4       5       6       7       8
9       10      11      12      13      14      15      16
17      18      19      20      21      22      23      24