Help for this page

Select Code to Download


  1. or download this
    package UNIVERSAL::can;
    
    # Small performance hit and breaks otherwise working code.
    ...
    our $VERSION = $max_int;
    
    1;
    
  2. or download this
    use CPAN;
    
    {
    ...
    }
    
    CPAN::Shell->r;
    
  3. or download this
    use Test::Most 'no_plan';
    
    use Config
    ...
        is +(scalar grep { /Exporter::NoWork/ } @Foo::ISA), 1,
            '... and multiple uses of Exporter::NoWork should only add to 
    +@ISA once'
    }