sub load_class {
my $class = shift;
- return if ref($class);
- return unless defined($class) && length($class);
+
+ return 0 if ref($class) || !defined($class) || !length($class);
return 1 if is_class_loaded($class);
This function can be used in place of tricks like
C<eval "use $module"> or using C<require>.
+=head2 is_class_loaded Class::Name -> Bool
+
+Returns whether this class is actually loaded or not. It uses a heuristic which
+involves checking for the existence of C<$VERSION>, C<@ISA>, and any
+locally-defined method.
+
=head1 AUTHOR
Shawn M Moore, C<< <sartak at gmail.com> >>