編寫測試以確保Perl腳本加載特定模塊

Question

我正在使用CPAN的Test模塊編寫測試腳本。我希望腳本測試以查看我的程序是否加載了URI :: URL包。這可能嗎？

Answer 1

如果我正確理解你，你想檢查一段代碼是否加載某個模塊。

你可以通過運行一段代碼，然後檢查%INC算賬：

# run your script (e.g. via 'do' or 'require') 
# ... 

ok $INC{'URI/URL.pm'}, "URI::URL was loaded"; 

Answer 2

這可能是更好地使用該模塊Module::Loaded，而不是分析%INC的。從perl 5.9.4開始它是一個核心模塊。

http://perldoc.perl.org/Module/Loaded.html

use Module::Loaded; 

if (is_loaded('URI::URL')) { 
    print "Is loaded\n"; 
} else { 
    print "Is NOT loaded\n"; 
} 

希望能解決你的問題。