Select Code to Download

 
$cal->item( 15, 16, 17 )->wrap_content( font({ size => 4, color => 're
+d' }) );

#!/usr/bin/perl -w
use strict;
...

#There may be a lot of gobbledygook here but I hope it gives an idea o
+f what I'm trying to do with this approach.
#Other issue is re-sorting so the calendars are placed in the table in
+ order.