package My::Package;
use strict;
use warnings;

use constant SOME_VALUE => 12;
use constant SOME_DERIVED_VALUE => 14;
use constant ANOTHER_DERIVED_VALUE => 21;

sub new {
    bless {}, ref($_[0]) || $_[0];
}

1;