[perl] use mit variablen Namen

[blackm]

Hi,

ich hab ein Verzeichnis in dem perl Module sind. Dazu hab ich noch eine Datenbank in der alle aktiven Module gelistet sind. ich moechte nun alle Module laden die in der Datenbank sind, aber irgendwie scheint usenicht mit variablen arbeiten zu koennen...

Code: Alles auswählen

use $modul_name

funktioniert nicht, da gibt es einen syntax error.

Jemand ne Idee wie ich das machen kann?

by, Martin

[Olaf Dietsche]

Du kannst das mit require und import simulieren. Schau mal in

Code: Alles auswählen

man perlfunc
...
       use Module VERSION LIST
       use Module VERSION
       use Module LIST
       use Module
       use VERSION
               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; }

               except that Module _must_ be a bareword.
...

[blackm]

Damit hatte ich es schonmal versucht...hatte damals aber nicht funktioniert weil ich es in den BEGIN { .... } Block geschrieben hatte. Da die Variablen da noch nicht gesetzt sind konnte er das require nicht richtig aufrufen.

Code: Alles auswählen

#! /usr/bin/perl -w

use strict;

my $m = 'diagnostics';

require "$m.pm";

funktioniert.

by, Martin