# example.pl
use strict;
use warnings;
use lib '.'; 
require XYZ;
print "PI=".$XYZ::PI."\n";
print "CONST=".XYZ::CONST."\n";