Thread Modul-Einbindung mit eval (40 answers)
Opened by bianca at 2011-03-28 18:38

pq
 2011-03-28 19:27
#147023 #147023
User since
2003-08-04
12208 Artikel
Admin1
[Homepage]
user image
mal generell:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
my $utc_module;
BEGIN {
    if ($^O eq 'win32') { # oder Win32, keine ahnung
        $utc_module = eval "use Win32::Something (...); 1;" || 0;
    }
    else {
        $utc_module = 0;
    }
}


jetzt musst du nur noch entscheiden, ob du es global in all deinen packages haben willst, dann importierst du :globally, dadurch werden die core-funktionen damit überschrieben. oder du machst das ganze für jedes package, aber dann nicht mit :globally, sondern :DEFAULT.
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: Wiki:Wie frage ich & perlintro Wiki:brian's Leitfaden für jedes Perl-Problem

View full thread Modul-Einbindung mit eval