http://www.perlmonks.org?node_id=815684


in reply to Re: My Conway's Game Of Life Attempt
in thread My Conway's Game Of Life Attempt

The intent of the substr pair would be clearer as:
substr($new_world->[$y], $x, 1) = ( $n == 3 ? '0' : ' ' );