$ perl -le '$| = 42; print $|;$|--;print $|' 1 0