#! /usr/bin/perl

package definitions;

require Exporter;
@ISA= qw(Exporter);
use strict;
use warnings;

######################################
## definitions so that if constants ##
## change or are wrong, they can be ##
## easily updated                   ##

@EXPORT=qw(CONST CONST2);

use constant CONST => 2;
use constant CONST2 => 3;

1;

##</code><code>##

#! /usr/bin/perl

use strict;
use warnings;
use Data::Dumper;

use definitions;

print Dumper CONST;
print Dumper "CONST";
print CONST

exit 0;