Module::Loaded(3pm) Perl Programmers Reference Guide Module::Loaded(3pm)NAME
Module::Loaded - mark modules as loaded or unloaded
SYNOPSIS
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
DESCRIPTION
When testing applications, often you find yourself needing to provide functionality in your test environment that would usually be provided
by external modules. Rather than munging the %INC by hand to mark these external modules as loaded, so they are not attempted to be loaded
by perl, this module offers you a very simple way to mark modules as loaded and/or unloaded.
FUNCTIONS
$bool = mark_as_loaded( PACKAGE );
Marks the package as loaded to perl. "PACKAGE" can be a bareword or string.
If the module is already loaded, "mark_as_loaded" will carp about this and tell you from where the "PACKAGE" has been loaded already.
$bool = mark_as_unloaded( PACKAGE );
Marks the package as unloaded to perl, which is the exact opposite of "mark_as_loaded". "PACKAGE" can be a bareword or string.
If the module is already unloaded, "mark_as_unloaded" will carp about this and tell you the "PACKAGE" has been unloaded already.
$loc = is_loaded( PACKAGE );
"is_loaded" tells you if "PACKAGE" has been marked as loaded yet. "PACKAGE" can be a bareword or string.
It returns falls if "PACKAGE" has not been loaded yet and the location from where it is said to be loaded on success.
BUG REPORTS
Please report bugs or other issues to <bug-module-loaded@rt.cpan.org<gt>.
AUTHOR
This module by Jos Boumans <kane@cpan.org>.
COPYRIGHT
This library is free software; you may redistribute and/or modify it under the same terms as Perl itself.
perl v5.16.2 2012-10-11 Module::Loaded(3pm)
Check Out this Related Man Page
base(3pm) Perl Programmers Reference Guide base(3pm)NAME
base - Establish an ISA relationship with base classes at compile time
SYNOPSIS
package Baz;
use base qw(Foo Bar);
DESCRIPTION
Unless you are using the "fields" pragma, consider this module discouraged in favor of the lighter-weight "parent".
Allows you to both load one or more modules, while setting up inheritance from those modules at the same time. Roughly similar in effect
to
package Baz;
BEGIN {
require Foo;
require Bar;
push @ISA, qw(Foo Bar);
}
"base" employs some heuristics to determine if a module has already been loaded, if it has it doesn't try again. If "base" tries to
"require" the module it will not die if it cannot find the module's file, but will die on any other error. After all this, should your base
class be empty, containing no symbols, it will die. This is useful for inheriting from classes in the same file as yourself, like so:
package Foo;
sub exclaim { "I can have such a thing?!" }
package Bar;
use base "Foo";
If $VERSION is not detected even after loading it, <base> will define $VERSION in the base package, setting it to the string "-1, set by
base.pm".
"base" will also initialize the fields if one of the base classes has it. Multiple inheritance of fields is NOT supported, if two or more
base classes each have inheritable fields the 'base' pragma will croak. See fields, public and protected for a description of this feature.
The base class' "import" method is not called.
DIAGNOSTICS
Base class package "%s" is empty.
base.pm was unable to require the base package, because it was not found in your path.
Class 'Foo' tried to inherit from itself
Attempting to inherit from yourself generates a warning.
use Foo;
use base 'Foo';
HISTORY
This module was introduced with Perl 5.004_04.
CAVEATS
Due to the limitations of the implementation, you must use base before you declare any of your own fields.
SEE ALSO
fields
perl v5.12.1 2010-04-26 base(3pm)