Opened by Gast at 2005-01-24 13:40
User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn
2003-08-04
2145 Artikel
ModeratorIn + EditorIn
@renee: Deine Loesung hat den Nachteil, dass keine einzelnen Ereignisse vorkommen duerfen, da sonst die Synchronisation fehlt: "RING - 10 sec - RING - 1 sec - RING - 1 sec - RING ..." wuerde nicht erkannt.
Hier eine Alternative (ungetestet):
Hier eine Alternative (ungetestet):
Code: (dl
)
1
2
3
4
5
6
7
8
my @times;
while (<>) {
next unless /RING/i; # alles, was kein RING ist, ueberspringen
if (@times >= 3 && time - shift @times < 3) { # 3 mal und weniger als 3 Sekunden
system ('shellskript &') == 0 or warn "kann shellskript nicht starten: $@";
}
push @times, time;
}