Version von Modul auslesen - Variable in Array als Modulvariable nehmen- geht das? (Allgemeines zu Perl)

[thread]19387[/thread]

Version von Modul auslesen - Variable in Array als Modulvariable nehmen- geht das?

Tags: perl5 Ähnliche Threads

Leser: 12

Articles: hide open all | hide show old branches

+4 replies
Gustl

2014-11-16 11:46
User since
2011-01-27
443 Artikel
BenutzerIn
Hallo,

ich habe mal wieder ein Problem. :)

Ich habe folgenden Code:
Code (perl): (dl )

1 2

my @modules = ("CGI","DBI"); print ${$_}::VERSION foreach @modules;
Ich möchte das Ergebnis von print $CGI::VERSION;
Ist das in Perl überhaupt möglich?

Danke.

Gruß Jörg
- +3 replies
- pq
  
  2014-11-16 14:59
  User since
  2003-08-04
  12209 Artikel
  Admin1
  (das ergebnis von print ist meistens 1, das nur nebenbei)
  
  1. nimm $modul->VERSION statt die variable
  2. das modul muss erst geladen werden, damit du die information bekommst
  
  Code (perl): (dl )
  
  1 2 3 4
  
  foreach @modules { eval "use $_"; say $_->VERSION; }
  
  allerdings ist das nicht immer gewünscht, das modul zu laden, nur um die version herauszufinden.
  dafür gibt es Module::Info
  
  Code (perl): (dl )
  
  1 2 3 4
  
  foreach (@modules) { my $mod = Module::Info->new_from_module($_); say $mod->version; }
  
  Last edited: 2014-11-16 15:00:10 +0100 (CET)
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - +2 replies
  - Gustl
    
    2014-11-16 15:20
    
    User since
    2011-01-27
    443 Artikel
    BenutzerIn
    
    Hallo,
    
    geladen wären die Module eigentlich eh.
    Aber habe dann doch Module::Info benutzt.
    
    Vielen Dank für den Tipp.
    
    Aber solch eine Ausführung wie ich sie vor hatte geht nicht in Perl oder?
    Ich meine damit wenn ich den Namen der Variable in einer Variable drin habe und dann eine Variable daraus machen will.... mhhh, klingt irgendwie konfus!?!
    
    Danke.
    
    Gruß Gustl
    - GUIfreund
      
      2014-11-16 15:59
      
      User since
      2011-08-08
      559 Artikel
      BenutzerIn
      
      Hier als Ausgangspunkt ein lauffähiger Einzeiler
      
      Code: (dl )
      
      perl -MCGI -e "my $mod = 'CGI'; print ${$mod . '::VERSION'}"
      
      Die Syntax ist für Windows, für Unixe musst du " und ' vertauschen.
      Für deinen Zweck musst du das noch etwas ausbauen.
      Gruß
      GUIfreund

View all threads created 2014-11-16 11:46.