nicht angemeldet
#!/usr/bin/perl
$ip = $ENV{'REMOTE_ADDR'};
&address_to_name ($ip);
sub address_to_name {
local ($address) = shift(@_);
local (@octets);
local ($name, $aliases, $type, $len, $addr);
local ($ip_number);
@octets = split ('.', $address);
$ip_number = pack ("CCCC", @octets[0..3]);
($name, $aliases, $type, $len, $addr) = gethostbyaddr ($ip_number, 2);
if ($name) {$hostname = $name;}
else {$hostname = $ENV{'REMOTE_ADDR'};}}
In $hostname steht dann z.Bsp. dialin-3039.t-online.de! Diesen String brauchst Du dann nur noch auszulesen, und ein Redirect auf die entsprechende Seite machen!!!
CIAO
Michael
Da T-Online über eigene Proxy-Server geht gibt es bei dynamischen Web-Seiten mit Coldfusion häufig Probleme deshalb die Frage: Gibt es eine CGI-Funktion mit der herausbekommt wer T-Online User ist und wer nicht.