use constant FOO => 35;
        FOO / ...

        use Fcntl qw(LOCK_SH);
        LOCK_SH / ...