Perl でカレンダーをかきたいときにつかうモジュール

Calendar::Simple がよさそう。結局、HTML を吐いてくれるタイプのものは、つかいがってがわるい。

二次元配列でだしてくれるので便利。DateTime に依存しているが、DateTime なしでもうごく。第三引数をあたえれば、週はじまりの曜日も制御可能。

use Calendar::Simple;
use Data::Dumper;

print Dumper(calendar( 7, 2010 ));

$VAR1 = [
          undef,
          undef,
          undef,
          undef,
          1,
          2,
          3
        ];
$VAR2 = [
          4,
          5,
          6,
          7,
          8,
          9,
          10
        ];
$VAR3 = [
          11,
          12,
          13,
          14,
          15,
          16,
          17
        ];
$VAR4 = [
          18,
          19,
          20,
          21,
          22,
          23,
          24
        ];
$VAR5 = [
          25,
          26,
          27,
          28,
          29,
          30,
          31
        ];

Published: 2010-08-15(Sun) 02:56