The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;

use Test::More 0.88;

use constant CONST => 123;
use namespace::clean;

my $x = CONST;
is $x, 123;

ok eval("!defined(&CONST)");

done_testing;