Interesting. I certainly didn't know that and it's not documented in perlvar.

$ perl -E '$| = 2; say $|; $| = -1; say $|; $| = 0; say $|; $| = undef
+; say $|'
1
1
0
0
[download]

Thanks for the information.