Modernized an example in perlipc.pod.

1. Convert to use strict + use warnings.

2. Convert to ->autoflush(1).

3. Changed a while(++ loop) to while(1) { ++ }.