exit ! main();
sub main { $success = [ undef, "true" ]->[rand 2]; print "$success\n" }

##</code><code>##

exit main();
sub main { $success = [ undef, "true" ]->[rand 2]; print "$success\n" }

##</code><code>##