| Server IP : 23.254.227.96 / Your IP : 216.73.216.183 Web Server : Apache/2.4.62 (Unix) OpenSSL/1.1.1k System : Linux hwsrv-1277026.hostwindsdns.com 4.18.0-477.13.1.el8_8.x86_64 #1 SMP Tue May 30 14:53:41 EDT 2023 x86_64 User : viralblo ( 1001) PHP Version : 8.1.31 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON Directory : /usr/share/perl5/vendor_perl/Role/Tiny/ |
Upload File : |
package Role::Tiny::With;
use strict;
use warnings;
our $VERSION = '2.000006';
$VERSION = eval $VERSION;
use Role::Tiny ();
use Exporter 'import';
our @EXPORT = qw( with );
sub with {
my $target = caller;
Role::Tiny->apply_roles_to_package($target, @_)
}
1;
=head1 NAME
Role::Tiny::With - Neat interface for consumers of Role::Tiny roles
=head1 SYNOPSIS
package Some::Class;
use Role::Tiny::With;
with 'Some::Role';
# The role is now mixed in
=head1 DESCRIPTION
C<Role::Tiny> is a minimalist role composition tool. C<Role::Tiny::With>
provides a C<with> function to compose such roles.
=head1 AUTHORS
See L<Role::Tiny> for authors.
=head1 COPYRIGHT AND LICENSE
See L<Role::Tiny> for the copyright and license.
=cut