Mark: 5 Sekunden auf BEnutzereingabe warten ansonsten weiter

Beitrag lesen

Sinnvoller wäre allerdings entweder eine Lösung über select() (das ist auch der Weg, den man üblicherweise in C gehen würde) oder eine Lösung über alarm().

Hallo CK,

mit select() komme ich nicht so ganz weiter:

my $rin="";  
my switch="";  
vec($rin,fileno(STDIN),1)=1;  
  
select($switch=$rin,undef,undef,5);

Das macht schon fast was ich will. Nur gibt mir select den STDIN auch aus, das möchte ich nicht. Es soll ja nur in der Variable $switch stehen.

Gruß