(perl)
%
pos += screamnext[pos]  /* does this goof up anywhere? */
             -- Larry Wall in util.c from the perl source code