Best wishes for the wedding etc.

Coupla minor points: if you use $_[0] and $_[1] instead of @_[0] and @_[1] this runs under -w without throwing up warnings. Of course, you're probably just readying up for perl 6 :-)

On a slightly more frivolous note, why not put a random chance of $self='married' in sub go_places or sub play and iterate over the whole thing: perl life.pl :-)

- Tim