elsif ( $rand < _rand ) { print "elsif2: $rand\n"; }