IP Auslesen !

[Marcus Vieß]

Gleich vorweg ich kann kein CGI Programmieren, habe  mal in andere Prgsprachen reingesehen, habe also Grundkentnisse.

Nun zu meiner Frage :

Ich benutzte ein Counterscript welches IP Adressen zwecks Reloadsperre ausliest.

Nun habe ich bei meinen Providern (Puretec & Strato) unterschiedliche einstellungen !

Strato :

# schreiben der letzten IP
  while ($#logip >= 2){
    shift @logip;
  }
  push (@logip,"$ENV{'HTTP_CLIENT_IP'}\n");
  open(logfile,">log.txt") &FEHLER("Kann Datei <b>log.txt</b> nicht erstellen.");
  print (logfile @logip);
  close(logfile);

Puretec :

schreiben der letzten IP

while ($#logip >= 2){
    shift @logip;
  }
  push (@logip,"$ENV{'REMOTE_ADDR'}\n");
  open(logfile,">log.txt") &FEHLER("Kann Datei <b>log.txt</b> nicht erstellen.");
  print (logfile @logip);
  close(logfile);

also nun zur frage gibt es da vielleicht eine Universalmöglichkeit ???
Wie gesagt bei Puretec läüft alles ! Bei Strato gibt es seit einiger Zeit Probleme, gibt es vielleicht Möglichkeit 3 welche bei beiden Providern läuft und nun auch bei Strato funzelt ???

gruss,
                  Marcus ...