package wild;
$VERSION = 0.01;

use strict;
use Carp;
use Module::Find;


sub import {
    shift;

    foreach my $module (@_) {
        # at the moment we only support '...::*'
        if ($module =~ /(.+)::\*$/) {
            usesub $1;
        } else {
            croak "'$module' not supported, only '...::*'";
        }
    }
}


1;

##</code><code>##

#!/usr/bin/perl -w

use strict;
use Data::Dumper;

BEGIN {
    print Dumper(\%INC);
}

use wild 'HTML::*';

print Dumper(\%INC);