Help for this page

Select Code to Download

Select or download this

sub html_calendar {
  my ($month, $year, $eventshashref) = @_;
...
  $calendar .= qq[</tr>\n</tbody></table>];
  return $calendar;
}

Select or download this
my $cal = html_calendar(11, 2006, { 23 => {class => 'holiday', time => '', shortdesc => 'Thanksgiving', longdesc => 'Stay home and stuff yourself.'}});