/usr/share/perl5/Role/Tiny/With.pm is in librole-tiny-perl 1.003002-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 | package Role::Tiny::With;
use strict;
use warnings FATAL => 'all';
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
|