eval $source; #### ifdef::process( $source ) if exists &ifdef::process; eval $source; #### =begin MODPERL ifdef::process( $source ); =cut eval $source;