Thread Kommunikation mit andern Perl prozessen. (25 answers)
Opened by master at 2003-10-25 18:08

master
 2003-10-25 18:56
#67491 #67491
User since
2003-10-20
610 Artikel
BenutzerIn
[default_avatar]
Das skript soll pro sekunde im 1 mal arbeiten dürfen.
wenn mehr, dann eine meldung an benutzer "bitte warten"

Methode A:
Es soll also nur 1 mal pro sekunde arbeiten, dann warten bis die aktuelle sekunde rum ist.

Danach ist das "arbeiten" wieder erlaubt.
ruft man das skript früher auf, soll nur eine meldung erscheinen.


Methode B:

überziehen des skriptes erlaubten, dann einschränken.
also z.B.
Max 5 aufrufe in sekunde 1.  (schnitt 5)  
max 3 aufrufe in sekunde 2.  (schnitt 8/2  >  4)
max 2 aufrufe in sekunde 3.  (schitt 3)
max 1 aufrufe in sekunde 4.  (schnitt 2,75)
max 1 aufrufe in sekunde 5.  (12/5 = schnitt 2,4)
max 1 aufrufe in sekunde 7.  (13/7 = schnitt 1,8)
max 1 aufrufe in sekunde 10.  (14/10 = schnitt 1,4)

dann pause bis sekunde 60


der schnitt von 0,65 aufrufe pro sekunde sollte nicht zu lange überschritten werden. obiges beispiel ist also nicht gut. weil wir 10 sek. lang über dem schnitt liegen
Methode B muss ich noch austüfteln.

aber wie weiss ich zu welcher sekunde das letzt skritp aufgerufen wurde, ohne in DB oder auf fesplatte zu schreiben?



gruss\n\n

<!--EDIT|master|1067094036-->
$i='re5tsFam ^l\rep';$i=~s/[^a-z| ]//g;$\= reverse "\U!$i";print;

View full thread Kommunikation mit andern Perl prozessen.