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