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:

Date: >January >February >March >April >May >June >July >August >September >October >November >December % for(1..31) { print "$_\n"; } % my $thisyear = $kdate[5]+1900; % for(0..9) { print "".($thisyear+$_)."\n"; }

Time: % for(1..12) { print "$_\n"; } % for(my $i = 0;$i < 59; $i+=5) { if($i < 10) { $i="0".$i; } print "$i\n"; } A.M. P.M.

Duration (optional): 0 1 2 3 4 5 6 7 8 9 10 11 12 hours and 00 05 10 15 20 25 30 35 40 45 50 55 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");