Ausgabe eines Systemprogramms erfassen - #164500 (Allgemeines zu Perl)

errorsmith

2012-12-30 10:13

User since
2012-12-28
10 Artikel
BenutzerIn
[default_avatar]

Nicht mal ein ganz einfaches Script, aus der Doku übernommen funktioniert:

Code: (dl )

#!/usr/bin/perl
use Time::HiRes qw ( setitimer ITIMER_VIRTUAL time );

$SIG{VTALRM} = sub { print time, "\n" };
setitimer(ITIMER_VIRTUAL, 10, 2.5);
sleep 100

Sollte mir ja alle 2.5 Sekunden "time" ausgeben, oder?

Woran mag das liegen?
System ist das da:

Code: (dl )

1
2

root@broadcast:~# uname -a
Linux broadcast 3.2.0-33-generic #52-Ubuntu SMP Thu Oct 18 16:29:15 UTC 2012 x86_64 x86_64 x86_64 GNU/Linux

EDIT:
Mit $SIG{ALRM} und ITIMER_REAL funktioniert es. Hat das irgendwelche negativen Implikationen den REAL zu verwenden anstelle des VIRTUAL?

Grüße,
errorsmith