=begin MODPERL

ifdef::process( $source );

=cut

eval $source;