Piperine activates testicular apoptosis in adult rats