#########################################################
#my @url;
my $time                = localtime;
print LOG "$time $ENV{'REMOTE_ADDR'}
      $ENV{'HTTP_HOST'}$ENV{'REQUEST_URI'}" .
    " $ENV{'HTTP_REFERER'} \"$ENV{'HTTP_USER_AGENT'}\"\n";
close LOG;

$punct[1]       = ".";
$punct[2]       = "!";
$punct[3]       = "\?";
$punct[4]       = ":";

#foreach (@domains) {
#        push @url, "${_}${ap_alias}";
#}

# new code from LAI here:
my $numurl = my @url = map { "${_}${ap_alias}" } @domains;

#########################################################