my $c = HTML::CalendarMonth->new( year => 2003, month => 1, bgcolor => 'white', ); $c->maxrow($c->maxrow + 1); print $c->as_HTML;