2009-02-09 7 views

Répondre

11
if (-t STDIN) { 
    # stdin is connected 
} else { 
    # stdin is not connected 
} 

Je l'utilise habituellement en conjonction avec -t STDOUT, pour savoir si je suis en cours d'exécution d'un shell interactif, ou de Cron, pour permettre plus de sortie.

11

Vous pourriez également être intéressé par IO::Interactive pour savoir si Perl pense qu'il est en interaction avec un utilisateur. Le simple fait d'être connecté à un terminal ne signifie pas que l'utilisateur va voir ce que vous faites.

Questions connexes