constants.pl:

use constant test => 3;
1;
[download]

test.pl:

#!/usr/bin/perl
require 'constants.pl';
print main->test;
[download]

print 3