Perlscript mit Bashscript ausführen

[ibins]

Hallo,

ich möchte gerne regelmäßig prüfen ob ein Perlscript läuft und wenn nicht es neu starten.
Alles was ich bisher finden konnte hat mir leider nicht weitergeholfen.

Letztstand:

Code: Alles auswählen

#!/bin/bash

if ! ps ax | grep "waagen" | grep -v "grep" 1> /dev/null;
          then
              echo "read established"
          else
              /usr/bin/perl /pfad/waagen.pl
          fi

exit

Hat jemand von euch einen Hinweis für mich, Bitte?

Vielen Dank! Schönen Sonntag noch!
Michael

[Cae]

Code: Alles auswählen

#!/bin/sh

cmd='perl /tmp/sleep.pl'
pgrep -xf "$cmd" >/dev/null || $cmd

Crontab:

Code: Alles auswählen

*/10 * * * * /tmp/checksleep

So oder so aehnlich.

Willkommen im Forum!

Gruss Cae

[uname]

Solltest du in der ersten Zeile des Perl-Scripts den Perl-Shebang eingetragen haben kannst du auf "perl" zum Aufruf noch verzichten.

[wanne]

ich würde das so machen:

Code: Alles auswählen

pid=0
while [ 1 ]
  do if ! ps -eo pid | grep -E "^ $pid$"
    then perl /pfad/waagen.pl&
    pid=$!
  fi
  sleep 5
done

PS: zwichen ^ und $pid muss ein Leerzeochen, (sieht man schlecht) weil ps jede Spalte mit einem solchen beginnt.
Anmerkung das Script erkennt nur von ihm selbst gestartete instanzen. Du kannst auch nach dem namen des scriptes in den Prozessen suchen aber das birkt halt immer die Gefahr, dass irgend jemand ein script nutzt, das gleich heißt.

[wanne]

Edit: das geht eigentlich viel simpler:

Code: Alles auswählen

while [ 1 ]
  do perl /pfad/waagen.pl
done

Sobald das Script beendet wird einfach direkt wieder neu starten...

[Cae]

Und wenn's sich forkt, aber weiter laeuft, hast du 'ne Endlosschleife, die froehlich Perl-Prozesse erzeugt. Ich wuerde da wenigstens ein sleep reinpacken a la

Code: Alles auswählen

while :; do
	/pfad/waagen.pl
	sleep 1;
done

Gruss Cae

[ibins]

Vielen Dank für's Willkommen und für Eure Antworten.
Leider klappt's immer noch nicht, das Script "hängt" wenn ich es ausführe.
Naja, ich muss mich wohl mehr in die Materie einlesen

Jedenfalls Danke nochmal!
Michael

[ibins]

Hallo nochmal,

ich bin vermutlich der Dümmste hier im Forum.
Das ursprünglich Script hat eh funktioniert, nur habe ich vergessen, dass mein Perl-Script eine Schleife eingebaut hat und ich auf einer zweiten Konsole das Ergebnis beobachten hätte sollen

Vielen Dankfür Eure Mühe.

Schöne Grüße
Michael