Re^2: Use of AutoLoader in Modern Times (future)

in reply to Re: Use of AutoLoader in Modern Times (future)
in thread Use of Autoloader in Modern Times

Module::Runtime's use_module function may be to your liking...

use_module('My::Utils')->import(qw< min max zip >);

my $logger = use_module('My::Logger')->new(-trace => 1);
[download]

Update:... some people may well consider this insane but...

BEGIN {
    package PerlX::qm;
    no thanks;
    sub import {
        my ($me, $name) = @_;
        require Module::Runtime;
        require PerlX::QuoteOperator;
        PerlX::QuoteOperator->new->import($name || "qm", {
            -parser => 1,
            -with => sub ($) {
                Module::Runtime::use_module(grep /\w/, split /\s/, $_[
+0])
            },
        }, scalar caller);
    }
};

use 5.010;
use strict;
use warnings;
use PerlX::qm;

say qm( Math::BigInt 1.000 )->new('4660')->as_hex;
say qm( Math::BigFloat )->new('74565')->as_hex;
[download]

PerlX::qm defines a quote-like operator (like qq, qw or qx) for module names. Quoted modules are loaded at runtime, and can be followed by an optional version number.

perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'

Comment on Re^2: Use of AutoLoader in Modern Times (future) Select or Download Code

In Section Seekers of Perl Wisdom