#!/usr/bin/perl -P
 
#define ABC 1
use constant DEF => 1;
 
print ABC, $/;
print DEF, $/;
------
$ ./abcd
gcc: file path prefix `/usr/ccs/bin/' never used
1
1