in reply to Using Pre-processor directive in Perl
There is perl's -P flag; see perlrun. Better to learn the perly way of doing things.
After Compline,Zaxo