use HTML::CalendarMonthSimple;
   $cal = new HTML::CalendarMonthSimple('year'=>2006,'month'=>10);
   $cal->width('50%');
   $cal->border(10);
   $cal->header('Event Calendar');
   $cal->setcontent(24,"UNO Day");
   $cal->setdatehref(24, 'http://localhost/');   
   print $cal->as_HTML;