view release on metacpan or  search on metacpan

lib/Perlmazing/Feature.pm  view on Meta::CPAN

use version;
our $VERSION = '1.2812';
our @ISA = qw(feature);
our $MAX_VERSION = '5.028000';

sub import {
    my $self = shift;
    my $version = $];
    $MAX_VERSION = $] if $MAX_VERSION > $];
    $version = $MAX_VERSION if $version > $MAX_VERSION;
    strict->import;
    warnings->import;
    eval {
        require feature;
        $Perlmazing::Feature::{unknown_feature_bundle} = sub {} unless defined $Perlmazing::Feature::{unknown_feature_bundle};
        $self->SUPER::import(':'.substr version->new($version)->normal, 1);
    };
}

1;