Opened by cbxk1xg at 2005-01-10 09:47
User since
2003-10-20
496 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-10-20
496 Artikel
BenutzerIn
Hallo,
ich habe mir eine kleine Sub zusammengeschrieben um herrauszufinden, ob ein bestimmtes Modul installiert ist. Jetzt würde ich gerne noch herausfinden welche Version dieses Modul hat. Ich hab's mit eval("use MODUL::VERSION") probiert, aber das funzt leider nicht.
Hier meine sub
ich habe mir eine kleine Sub zusammengeschrieben um herrauszufinden, ob ein bestimmtes Modul installiert ist. Jetzt würde ich gerne noch herausfinden welche Version dieses Modul hat. Ich hab's mit eval("use MODUL::VERSION") probiert, aber das funzt leider nicht.
Hier meine sub
Code: (dl
)
1
2
3
4
5
6
7
sub FindPerlModule
{
my ($Modul) = @_;
my $ModulStatus = "";
$ModulStatus = (eval "require $Modul" ? "OK" : "NOT INSTALLED");
return $ModulStatus;
}