in reply to Use with variable

perldoc -f use tells you the following:

Imports some semantics into the current package from the named module, generally by aliasing certain subroutine or variable names into your package. It is exactly equivalent to 
    BEGIN { require Module; import Module LIST; }

[download]
except that Module *must* be a bareword.

So, you can easily do it like the following:

my $module = "CGI"; 
$module->require;
$module->import;

[download]

Update: Fixed the ugly bug I introduced. Thanks to tomhukins for spotting it.

Update 2: I should test before I promise broken things as fixed. See my reply to edan further down

Replies are listed 'Best First'.
Re^2: Use with variable
by tomhukins (Curate) on Sep 08, 2004 at 13:18 UTC
    Module *must* be a bareword 
    my $module = "CGI"; 
require $module;

    [download]

    That's an interesting bareword you use. ;-)

[reply]
[d/l]
Re^2: Use with variable
by edan (Curate) on Sep 08, 2004 at 13:34 UTC 

    my $module = "CGI"; 
$module->require;
$module->import;

    [download]

    Can't locate object method "require" via package "CGI" (perhaps you forgot to load "CGI"?) at t.pl line 2.
    --
    edan

[reply]
[d/l]

      That's what I get for not testing my stuff :-((

      So it seems the only actually working way is the ugly way of converting the module name to the file name and then requiring that file :

      my $module = "CGI";
my $filename = $module;
$filename =~ s!::!/!g;
$filename .= ".pm";
require $filename
  or die "$module did not return a true value";
$module->import;

      [download]

      (this time tested it ...)

[reply]
[d/l]

        Do you have something against eval? I think that's the most straightforward solution...

        --
        edan

[reply]

In Section Seekers of Perl Wisdom