Re: [cobalt-developers] Username -> website

["Adam Clarke" <Adam.Clarke@xxxxxxxxxxxxxxxxxxxx>]

Hi Edoardo,

Does the SERVER_NAME or HTTP_HOST environment variable give you what you
need? I have not tested this in a virtual host environment but I think that
one of them will give the actual hostname and the other will give the
virtual host name.

This script will let you view all the environment variables that are set.

Cheers
Adam


----
#!/usr/bin/perl -w

use strict;
use CGI;

my $q = CGI->new;

print $q->header;

foreach my $envvar (keys %ENV) {
    print "$envvar = $ENV{$envvar}<BR>\n";
}