Nasıl olursa koşulu

Question

Olası yinelenen bir modülü kullanmak:
How do I use a Perl package known only in runtime?

Ben bir koşulu karşılayan yalnızca eğer bir modül yüklemek istiyor.

Lütfen bunu nasıl kullanacağımı lütfen bana bildirin. Bunun sözdizimini biliyorum. Ancak, use::strict modülünü kullandığımda bir hata alıyorum. Modülün tanımlanması gerektiğini belirten bir hata atıyor. 'use :: strict' modülünü kullanmazsam program düzgün çalışır. İşte

sözdizimi:

use if CONDITION, MODULE => ARGUMENTS; 

beni bu iş modülünü use::strict kullanarak nasıl bildirin. Eğer doğru sorununuzu anlamak

Answer 1

, muhtemelen şöyle yerine eval kullanabilirsiniz: if module from CPAN kullanmaya çalışıyorsanız gibi

if ($condition) { 
    require Conditional::Module; 
    Conditional::Module->import(qw{ methods to be imported }); 
} 

Answer 2

Sen require kullanabilirsiniz . Çalıştırmaya çalıştığınız tam kodu ve aldığınız tam hata mesajını gösterir misiniz? Bu olmadan, size yardım etme girişimleri büyük ölçüde tahmin edilir.

Güncelleştirme: Aslında, if'un çekirdek bir modül olduğunu görüyorum (ve bir süredir). Yine de sizden daha fazla bilgiye ihtiyacımız var.

Güncelleme güncelleme:

#!/usr/bin/perl 

BEGIN { 
    $use_strict = 0; 
} 

use if $use_strict, strict; 

$use_strict bayrağının ayar sıkı modunun açık olup olmadığını belirler: İşte bir örnek.

Answer 3

görünüyor:

if (some test here) 
    eval "use WHATEVERMODULE"; 

Answer 4

Tamam, bu nedenle if'u kullanmaya çalışıyorsunuz. Bununla birlikte, katı kullanımın ne anlama geldiğini yanlış anlamışsınız gibi görünüyorsunuz.

Size olmalı, şu anlama gelir:

use strict; 

(ve tabii ki, onun pal use warnings;) Senaryonuzun başında.

Not: use::strict, hayal ettiğiniz şeyi yapmıyor.