#!/usr/bin/perl require "/home/httpd/grainnet4/ssjs/info/functions.pl"; $headerimage='head_cal.gif'; $headerbgcolor='#341B6E'; print<

EVENTS CALENDAR

THEEND print getEvents($request::howmany, $request::event_cat, $request::month, $request::year); print<
THEEND