NAME
Attribute::Universal - Install attribute handlers directly into UNIVERSAL namespace
VERSION
version 0.001
SYNOPSIS
package Disco;
use Attribute::Universal Loud => 'CODE';
sub ATTRIBUTE {
my ($package, $symbol, $referent, $attr, $data) = @_;
# See Attrbute::Handlers
}
# Attribute is installed global
sub Noise : Loud {
...
}
DESCRIPTION
According to the example above, this module does just this on import:
sub UNIVERSAL::Load : ATTR(CODE) {
goto &Disco::ATTRIBUTE;
}
Hint: the redefine warning is still enabled.
More than one attribute may be defined at import, with any allowed option:
use Attribute::Universal RealLoud => 'BEGIN,END', TooLoud => 'ANY,RAWDATA';
BUGS
Please report any bugs or feature requests on the bugtracker website https://github.com/zurborg/libattribute-universal-perl/issues
When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature.
AUTHOR
David Zurborg <zurborg@cpan.org>
COPYRIGHT AND LICENSE
This software is Copyright (c) 2015 by David Zurborg.
This is free software, licensed under:
The ISC License