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;
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;
Updated
Regards, Velusamy R. eval"print uc\"\\c$_\""for split'','j)@,/6%@0%2,`e@3!-9v2)/@|6%,53!-9@2~j';
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|