stdout이 Perl의 tty에 연결되어 있는지 어떻게 알 수 있습니까?

Question

나는이 파이썬 코드에 펄 상당을 찾고 있어요 :

from sys import stdout 
if stdout.isatty(): 
    print "yes" 
else: 
    print "no" 

Answer 1

가 -t filetest operator를 사용합니다. 펄, STDOUT가 연결될 수있다 (본질적 overcomplicated 과부하 목적) 그래서 STDOUT 출력은 여전히 ​​직접 하나에 연결되어 있지 않더라도 TTY 도달 할 수 있음은

print -t STDOUT ? "Yes\n" : "No\n" 

참고.

Answer 2

STDOUT이 실제로 터미널에 연결되어 있고 /dev/null/ 또는 기타로 리디렉션되는 것이 아니라면 IO::interactive을 사용하십시오.