Perl Test
==========

A perl directive that returns a perl directive.

.. perl:: 
   qq(.. perl:: return "It works.\\n"\n)

.. perl::
   qq(.. perl:: die "He dead")

A paragraph.