[PERL] Perl 不立即輸出的列印緩衝區問題 @新精讚

1235

“

解決Perl 不立即輸出而是最後一次輸出的列印緩衝區問題

„

從下面的程式範例開始，在控制台(console)中執行這個perl程式，每隔1秒列印 '.'，共100秒：

for(1..100){
print ".";
sleep(1);
}

結果並不會1秒印一個點 '.' 出來，而是到了100秒之後，一次把100個點印出來出來。

而我不要這樣的結果，我想要一個個點分別印出來，因此查找了一下，發現這是列印緩衝區的問題：

除非 print 遇到換行 "\n"或結束，否則他不會輸出到STDOUT(檔案或console或印表機)

要將內容直接送出，就要用到特殊變數 $|，也就是一個錢號'$'和一個垂直線'|'。當$|為非0值時，他會將緩衝區的文字送出。因此程式改寫如下：

for(1..100){
    print ".";
    $|=1;
    sleep(1);
}

就可以解決這個問題。但這不是好的作法，因為 $|只要設定一次即可，所以下面才是好的作法：

$|=1;
for(1..100){
    print ".";
    sleep(1);
}

原文 2009-11-26 23:53:54

END

[PERL] 08-陣列 #2 --操作更多perl陣列的操作，如拆開、黏合、取出、加入等等

[PERL] Perl 不立即輸出的列印緩衝區問題解決Perl 不立即輸出而是最後一次輸出的列印緩衝區問題

Perl的類別物件利器 bless 使用bless來替perl建立class物件。

Perl 的特殊變數：$_、$&、$! 介紹perl的特殊變數 $_ 、 $&、$!

PHP for sphinx 函式庫安裝 PECL/sphinx PHP>= 5.2.2 已經能原生支援 sphinx，可是預設的沒有裝，我們得自己裝才能用

[JAVA] JWS, JWT, JWE, JOSE是什麼？ [JAVA] JWS, JWT, JWE, JOSE是什麼？非常的複雜，儘量來搞清楚..

Smarty安裝 smarty 是著名的樣版引擎，非常的好用，用多了突然發現拿掉smarty反而不會寫php了，以下是安裝過程..

設計的工作絕不接受比價拿買陽春麵的價格想買牛肉麵，寧願倒掉也不賣

此一時彼一時我是不是易怒的人，其實我也不知道，總之我常會失控，不知道自己在幹嘛。這近生活過得浮浮的，不是很踏實，總會想太多，我甚至會