バッファリングなど特殊変数

Perl の特殊変数をよく忘れるのでメモしておきます。 Perl の特殊変数のうちときどき使うものも参考になります。

たとえば、バッファリングを行わないようにするには、以下のように $| を使用します。 (CPAN のモジュールを使った方が可読性が高くなるのでおすすめですが。 *1 )

# 標準入出力
$| = 1;
# 任意のファイルハンドル (STDOUT, STDIN, SOCKET, etc...)
select((select(SOCK), $| = 1)[0]);

*1:結構大きなモジュールなので速度が気になりますが、通常誤差の範囲です。