you can use source filters for that, see perlfilter manual page... though most of the time it is a bad idea to do so. As Corion has already suggested, a better alternative is to use "if (Constant) {...}" constructions.