打印：生產沒有輸出

Question

我很困惑。我剛拿到一臺新的開發機器，perl似乎沒有輸出任何內容，用於print命令。

#!/usr/bin/perl 
use warnings; 
use strict; 
print "A"; 
print STDOUT "B"; 
print STDERR "C"; 
open FH, ">", "testprint'; 
print FH "D"; 
close FH; 

可生產在控制檯什麼，testprint變成1再見（空）文件。

即使這會產生什麼：

perl -e "print 'a';" 

這情況出現在這恰好是我的機器上的Perl二進制文件。我很難從哪裏開始調試這個問題。有任何想法嗎？

編輯：

perl -v 

This is perl, v5.8.8 built for x86_64-linx-thread-multi 

和

which perl 

/usr/bin/perl 

Answer 1

問題不STDOUT丟失或起殼重定向，而是外殼設置寫時提示，從而覆蓋發送到同一行的所有輸出發送一個回車不換行。

具體來說，我的老版本zsh已經設置了promptcr。有關更多信息，請參閱question 3.23 here。

Answer 2

我相信存在的Perl以外的問題。無論是

• 在當你運行該腳本一些異常狀態的終端，
• perl的父進程重定向perl的輸出遠離終端，或
• perl的父進程沒有提供STDOUT和STDERR爲perl。

您可能可以通過實際檢查print是否返回錯誤來收集更多信息。 （它總是令我感到困惑，爲什麼人們不檢查錯誤，當事情不工作，他們的方式，他們希望它的工作。）

perl -we'print("a") or die("Can'\''t print: $!\n");' 

您可能能夠通過使用strace或任何收集更多的信息，這就是所謂的在你的系統上。 （尋找write(1和write(2）

strace perl -we'print("a") or die("Can'\''t print: $!\n");' 

但這些應該打印什麼都沒有，如果問題是Perl的外面，這就是爲什麼它可能是明智的嘗試將輸出重定向到一個文件，然後檢查文件和它的大小。

perl -we'print("a") or die("Can'\''t print: $!\n");' 1>out 2>err