I suppose this is actually a JavaScript/DHTML question, and isn't really related to Perl in any way. But I'll give you a link to the calendar control we use, and like: http://www.dynarch.com/projects/calendar.