Stefan Welscher: "use" dynamisch verwenden?

Beitrag lesen

Allerdings scheint PERL mit "use $modul[$i];" nicht klarzukommen (Syntax Error).

Darum meine Frage an euch.... :
Wie kann ich das realisieren?

mit require oder eval() kommt ganz darauf an.

Struppi.

Hallo und zunächst Danke...
Allerdings funktioniert das mir require nicht so ganz, wie ich mir das vorgestellt habe (vereinfachte Darstellung):

Hauptdatei:

use strict;

use lib "/home/mydir/lib/";
use IP_tool;
use Convert;

$add_module="input.pm";
require $add_module;

$input=&read_input("foo","bar");
$input=&convert_data($input);

print $input;

input.pm:

package input;

use Exporter;
@ISA=('Exporter');
@Export=qw( &read_input );

sub read_input
{
...
}

Convert.pm:

package Convert;

use Exporter;
@ISA=('Exporter');
@Export=qw( &convert_data );

sub convert_data
{
...
}

"convert_data" kann ich problemlos aufrufen, allerdings findet das Programm "&main::read_input" nicht...