Perl拾遗

1. $| = 1; $|缓冲输出控制标记，若设置为0，表示当前输入不经过缓存直接输出。

2. use warnings;

    -w

The warning pragma is a replacement for the command line flag -w, but the pragma is limited to the enclosing block, while the flag is global.