Wie kann man beim lesen von stdin einen timeout setzen?

lano

Mitglied
Moin.

Ich lese von stdin. Jetzt möchte ich wenn nix gelesen wird in einer bestimmten zeit das Programm beenden.
Es geht sich um Perl. Jemand eine idee?
 
Oben Unten