$| = 0;
   print "first=", $|, " second=", $|--, "\n";