Select Code to Download

#define FOO "bar"
print qq(The value of FOO is "), FOO, qq("\n);

$ perl cpp.pl
The value of FOO is "FOO"
$ perl -P cpp.pl
The value of "bar"  is "FOO"
$

> 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
>

$ perl -P cpp.pl
ngcc: -: No such file or directory
ngcc: No input files specified.
$