$|=0;
print $|;
$|=-1;
print $|;
$|++;
print $|;
$|++;
print $|;

prints:
0
1
1
1