in reply to question about code

Slightly off-topic... Consider changing
if (!(substr($Request->ServerVariables("SERVER_NAME")->item(),0,3) + eq "www") && !(substr($Request->ServerVariables("SERVER_NAME")->item +(),0,3) eq "mlx") && !(lc($Request->ServerVariables("SERVER_NAME")->i +tem()) eq "localhost"))
to
my $svr = $Request->ServerVariables("SERVER_NAME")->item(); if ((substr($svr,0,3) ne "www") && (substr($svr,0,3) ne "mlx") && (lc($svr) ne "localhost"))
It's a little more readable.