Opened by FReAK La Marsch at 2004-05-14 14:04
User since
2003-08-14
38 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-14
38 Artikel
BenutzerIn
Hallo,
ich habe einen Daemon in Perl geschrieben und der läuft auch.
Nun würde ich den Daemon gerne übers Web starten und stoppen, damit er nur läuft wenn ich ihn brauche.
Ich habe es so versucht:
Da habe ich nun das Problem, daß der system Aufruf zwar lokal auf dem Server funktioniert und der Daemon startet, doch beim Aufruf übers Web passiert nichts. In $! steht dann Illegal Seek oder so.
Bei unseren Admins vermute ich fast, daß der Webuser kein Recht hat den Daemon auszuführen.
Kennt jemand eine andere Methode einen Daemon zu starten? Bzw. wie stopp ich das Ding eigentlich aus Perl heraus wieder?
Falls jemand meint die Admins werden schon ihre Gründe haben ...
Da ich den Daemon direkt durch einen Webaufruf starten kann finde ich es recht albern wenn ich da jetzt ein Skript habe zum testen ob der Daemon läuft und dann eins um ihn direkt zu starten.
Viele Grüße und viel Spaß,
FReAK
ich habe einen Daemon in Perl geschrieben und der läuft auch.
Nun würde ich den Daemon gerne übers Web starten und stoppen, damit er nur läuft wenn ich ihn brauche.
Ich habe es so versucht:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
1 #!/usr/bin/perl
2
3 my $program = "/meinskript.pl";
4 my $foundit = 0;
5
6 open (IN, "ps axw |");
7 while (<IN>) {
8 if (/$program/) {
9 $foundit = 1;
10 last;
11 }
12 }
13 close IN;
14
15 print "Content-Type: text/html\n\n";
16 if (!$foundit)
17 {
18 print "starte $program<br>";
19 system("deamon.pl") or print "problem! $!";
20 }
21 else
22 {
23 print "$program läuft bereits<br>";
24 }
25 print "Fertig";
26 exit;
Da habe ich nun das Problem, daß der system Aufruf zwar lokal auf dem Server funktioniert und der Daemon startet, doch beim Aufruf übers Web passiert nichts. In $! steht dann Illegal Seek oder so.
Bei unseren Admins vermute ich fast, daß der Webuser kein Recht hat den Daemon auszuführen.
Kennt jemand eine andere Methode einen Daemon zu starten? Bzw. wie stopp ich das Ding eigentlich aus Perl heraus wieder?
Falls jemand meint die Admins werden schon ihre Gründe haben ...
Da ich den Daemon direkt durch einen Webaufruf starten kann finde ich es recht albern wenn ich da jetzt ein Skript habe zum testen ob der Daemon läuft und dann eins um ihn direkt zu starten.
Viele Grüße und viel Spaß,
FReAK