% use DBI; my $db = DBI->connect("dbi:mysql:host=db76a.pair.com:database=sultmhoo_calendar","sultmhoo_6","8Sq5Yw=jz"); PrideSource: Calendar and Happenings
<& "banner.phtml",region=>16 &>
Articles    Business Type    Business Name or City
<& "dept-nav.html" &>

Simple Calendar Entry

This is the page where you can quickly enter a simple, single entry into the BTL calendar. For more complicated, multiple, or repeating events, please create an account (they're free) and use the more comprehensive calendar application found here.

The title of your event:

Sponsoring organization (required):

The location of your event:

Address

City

State/Province

Zip Code/Postal Code

Phone Number for information:

Email as it will appear in the event:

A website people can check for more information:

% my @kdate = localtime(time);

Date:

Time:

Duration (optional): hours and minutes

Any thing else you want to add?

Your (unpublished) email address in case things need changing

In order to make sure you're a person and not a computer, enter the letters in the following image into the field below it.

% use LWP::Simple; print get("http://calendar.pridesource.com/captcha.html");