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