Re: [RFC] export TRUE and FALSE from someplace

["A. Pagaltzis" <pagaltzis gmx de>]

* Joe Smith <jes martnet com> [2004-01-21 13:09]:
> Here's my 'constants' file:

If you require Perl 5.8 you can thankfully clean that up a bit:

    use constant {
        True   => 1,
        False  => 0,
    };
        
    use constant {
        Left   => 0;
        Center => 0.5;
        Right  => 1;
        Top    => 0;
        Bottom => 1;
        
        Homogeneous => 1;
        Variable    => 0;
        
        NoFill    => 0,
        Fill      => 1,
        NoExpand  => 0,
        Expand    => 1,
        NoPadding => 0,
        NoSpacing => 0,
        
        DefaultDepth => -1,
        
        Process_Event => False,
        Block_Event   => True,
    };

Of course that doesn't address the actual problem of needing this
in the first place..

-- 
Regards,
Aristotle
 
"If you can't laugh at yourself, you don't take life seriously enough."