>perl -le"for (0,1,0) { $|=$_; print $|, ${'main::|'} }"
00
11
00

##</code><code>##

>perl -le"print \$| == \${'main::|'} ? 'same var' : 'diff var'"
same var