2008-05-02 STDIN が tty かどうかの確認 perl -t STDIN $ perl -e "print -t STDIN\n" 1 $ perl -e "print -t STDIN\n" < hoge.txt $