內容

名稱

Module::Loaded - 標記模組為已載入或未載入

語法

use Module::Loaded;

$bool = mark_as_loaded('Foo');   # Foo.pm is now marked as loaded
$loc  = is_loaded('Foo');        # location of Foo.pm set to the
                                 # loaders location
eval "require 'Foo'";            # is now a no-op

$bool = mark_as_unloaded('Foo'); # Foo.pm no longer marked as loaded
eval "require 'Foo'";            # Will try to find Foo.pm in @INC

說明

在測試應用程式時,您經常會發現自己需要在測試環境中提供外部模組通常會提供的功能。這個模組提供一個非常簡單的方式來標記模組為已載入和/或未載入,而不是手動修改 %INC 來標記這些外部模組為已載入,因此 perl 就不會嘗試載入它們。

函式

$bool = mark_as_loaded( PACKAGE );

將套件標記為已載入 perl。PACKAGE 可以是裸字或字串。

如果模組已載入,mark_as_loaded 會對此發牢騷,並告訴你 PACKAGE 已從何處載入。

$bool = mark_as_unloaded( PACKAGE );

將套件標記為已從 perl 卸載,這與 mark_as_loaded 正好相反。PACKAGE 可以是裸字或字串。

如果模組已卸載,mark_as_unloaded 會對此發牢騷,並告訴你 PACKAGE 已卸載。

$loc = is_loaded( PACKAGE );

is_loaded 會告訴你 PACKAGE 是否已標記為已載入。PACKAGE 可以是裸字或字串。

如果 PACKAGE 尚未載入,它會傳回 falls,如果載入成功,則會傳回載入位置。

錯誤回報

請將錯誤或其他問題回報至 <bug-module-loaded@rt.cpan.org<gt>。

作者

此模組由 Jos Boumans <kane@cpan.org> 編寫。

版權

此程式庫為免費軟體;你可以根據 Perl 本身的條款重新散布和/或修改它。