autoload.pl

#!/usr/bin/env perl

{
    package UNIVERSAL;

    sub new {
        my ($class) = @_;
        eval "require $class;";
        die $@ if $@;
        goto $class->can('new');
    }
}

package main;

print Mojo::JSON->new->encode({ foo => 'bar' }), "\n";