package My::Constants;

use base 'Exporter';
use constant TRUE       => 1;
use constant FALSE      => 0;
use constant NL      => "\n";
use constant NULL   => "\0";

our @EXPORT = qw(TRUE FALSE NL NULL);
1;