my $req_uri_re = join '|', map quotemeta, qw(
    /bulletin/ .css .ico formmail /prosp/
    /calendar/ /edit/    
    /tmp/calendar2002-3/pgradh/regs/029.html/
);

if ($ENV{'HTTP_REFERER'} and $ENV{'REMOTE_ADDR'} ne "129.215.67.96"
    and $ENV{REQUEST_URI} !~ $req_uri_re) { }