in reply to The sort of fiction you're most likely to find me reading:
--------------------------------- life is ... $mutation=sub{@_=split'';$gene=int(rand($#_+$=/$=));$_[$gene]=$=/$=-$_[$gene];$_=join'',@_};