Supportnet Computer
Planet of Tech

Supportnet / Forum / Skripte(PHP,ASP,Perl...)

perl programm für LogFiles





Frage

Ich möchte gern in Perl ein Programm schreiben. Weiß aber nicht wo ich ansetzen soll. Mit While Schleifen habe ich es nicht hinbekommen. Ich weiß aber das es gehen soll. Also das Programm soll Rechner im Netzwerk anpingen und diese dann in irgendeinem Logfile abgespeichert werden. Kann mir jemand mit einem Beispiel Code helfen ???bin noch ziemlich unbewandt in Perl aber dennoch begeistert davon :-)

Antwort 1 von disco

moin

da musste noch nen paar angaben machen, glaub ich.
- muss das unbedingt mit perl passieren?
- welches betriebssystem haste?
- woher weiss man, welche rechner angepingt werden sollen? stehen die vielleicht in ner datei oder soll eine Ip-bereich abgearbeitet werden?
- was soll bei erfolg und misserfolg in das log geschrieben werden?

g,
disco

Antwort 2 von Advare

Also ich möchte das mit Perl bzw CGI erledigen.

Um deine Frage zu beantworten.

-WIndows XP
-Der "ping" befehl soll ausgeführt werden,dabei soll ein IP Bereich abgefragt werden den ich über eine Print anweisung angebe
-eigentlich soll erfolg und misserfolg protokolliert werden(wenns nicht so einfach ist würde allerdings erfolg auch reichen)

Vielen Dank für deine Hilfe

Antwort 3 von disco

also meine perl-interesse ist damals durch reguläre ausdrücke bis zum erbrechen stark in den keller gegnangen :-)
aber ich würds wohl ansatzweise so lösen:

2 dateien:
server.txt mit serveradressen
adresse1
adresse2
usw

autoping.bat
@echo off
FOR /F %%h IN (server.txt) DO ping -n 1 %%h >> log.txt

dann rufste die autoping.bat im perlscript auf.
glaube das ging mit system("autoping.bat).

ins log.txt wird jetzt einfach jeweils ein ping pro server geschrieben. kannst dir entweder durch ein perlscript das nötige rausparsen, oder man könnte auch wohl noch etwas schöner ins log selbst schreiben...

g,
disco

Antwort 4 von Advare

Es müsste ja auch einfacher gehen ich denke da an sowas wie zum Beispiel.

Ping Befehl ausführen->Mir das Ergebnis über "Print" anzeigen

Ich habe mir das erklären lassen (vor einer ganzen Weile)geht auch unter Perl alleine...aber wie?

Antwort 5 von disco

haste eigentlich schon selbst mal danach gegoogelt?
hab das mal jetzt 5 sekunden gemacht:
ping + perl

und bspw. das hier gefunden:
http://forum.de.selfhtml.org/archiv/2004/3/t74248/

g,
disco

Antwort 6 von Advare

Gegoogelt ja aber nicht mit dem Suchbegriff....

Aber danke es funktioniert. Jetzt will ich das nur noch das die Ergebnisse in ein Logfile abgespeichert wird und dann wäre ich zufrieden

Vielen Dank übrigens an die Tipps....

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: