Try this module, HTML::CalendarMonthSimple

 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;
[download]

Hi weihe, Try like this,

   use strict;
   use warnings;
   use HTML::CalendarMonthDB;
   my $cal = new HTML::CalendarMonthDB();   
   $cal->width('50%');
   $cal->border(10);   
   print $cal->as_HTML;
[download]

And also see How do I post a question effectively? and How (Not) To Ask A Question

Try below, it will give you date with hyperlink.

    use strict;
    use warnings;
    use HTML::CalendarMonth;
    use HTML::AsSubs;

     my $month = 10;
     my $year = 2006;
     my $cal = HTML::CalendarMonth->new( month => $month, year => $yea
+r );
     $cal->item($cal->year, $cal->month)->attr(bgcolor => 'wheat');
     $cal->item($cal->year, $cal->month)->wrap_content(font({size => '
++2'}));
     my @days = $cal->days;
     for (@days){
     $cal->item($_)->wrap_content(a({href => 'http://mysite/cal/index'
+.$year.$month. $_ .".html"}));
  }
     print $cal->as_HTML;
[download]

Updated

Hello,

Firstly, your question is somewhat oddly phrased.

Secondly, if you want to build this using Perl, I suggest you read up on CGI basics and perhaps look into Templating engines. See the Tutorials section.

Good luck,