- or download this
#define FOO "bar"
print qq(The value of FOO is "), FOO, qq("\n);
- or download this
$ perl cpp.pl
The value of FOO is "FOO"
$ perl -P cpp.pl
The value of "bar" is "FOO"
$
- or download this
> perl -P cpp.pl
'cl' is not recognized as an internal or external command,
...
> perl -P cpp.pl
Command line error D2003 : missing source filename
>
- or download this
$ perl -P cpp.pl
ngcc: -: No such file or directory
ngcc: No input files specified.
$