Calendar: Difference between revisions
Content added Content deleted
m (→{{header|Fortran}}: On the belated discovery of <pre>...</pre> thus removing the need for a leading space. Oddly, the resulting display seems to have a leading space, just the same!!) |
m (→post-GLR) |
||
Line 2,768: | Line 2,768: | ||
my $str = (' ' x 30) ~ $year ~ "\n"; |
my $str = (' ' x 30) ~ $year ~ "\n"; |
||
my @month-strs; |
my Array @month-strs; |
||
@month-strs[$_] = fmt-month($year, $_).lines for 1 .. 12; |
@month-strs[$_] = fmt-month($year, $_).lines.Array for 1 .. 12; |
||
loop ( my $month = 1; $month <= 12; $month += $months-per-col ) { |
loop ( my $month = 1; $month <= 12; $month += $months-per-col ) { |