view release on metacpan or  search on metacpan

lib/Kelp/Base.pm  view on Meta::CPAN

            push @{"${caller}::ISA"}, $base;
        }

        *{"${caller}::attr"} = sub { attr($caller, @_) };

        namespace::autoclean->import(
            -cleanee => $caller
        );
    }

    strict->import;
    warnings->import;
    feature->import(':5.10');
}

sub new
{
    my $self = shift;
    return bless {@_}, $self;
}

lib/Kelp/Less.pm  view on Meta::CPAN

sub import
{
    my $class = shift;
    my $caller = caller;
    no strict 'refs';
    for my $sub (@EXPORT) {
        *{"${caller}::$sub"} = eval("\\\&$sub");
    }

    strict->import;
    warnings->import;
    feature->import(':5.10');

    $app = Kelp->new(config_module => 'Config::Less', @_);
    $app->routes->base('main');
}

sub route
{
    my ($path, $to) = @_;