XML-Loy
view release on metacpan or search on metacpan
lib/XML/Loy.pm view on Meta::CPAN
};
};
# Set class hook
if (exists $param{on_init}) {
*{"${caller}::ON_INIT"} = delete $param{on_init};
};
};
# Make inheriting classes strict and modern
strict->import;
warnings->import;
utf8->import;
feature->import(':5.10');
};
# Return class variables
{
no strict 'refs';
sub _namespace { ${"${_[0]}::NAMESPACE"} || '' };
( run in 0.388 second using v1.01-cache-2.11-cpan-299005ec8e3 )