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


in reply to When I'm arguing with a fool...

Proverbs 26:4-5:
Do not answer a fool according to his folly, or you will be like him yourself.

Answer a fool according to his folly, or he will be wise in his own eyes.

I'm not terribly good with implementing nondeterministic logic myself, but I think we could do it with the following snippet:
my $folly = $fool->folly; if ( fork() ) { # child process answer( $folly); } else { # parent process answer( not $folly ); }