#!/usr/bin/perl -P
use strict;
#define C 10

my $var = C;
print $var . "\n";

##</code><code>##

#!/usr/bin/perl -P
require "progA.pl";