/usr/share/perl5/Moo/sification.pm is in libmoo-perl 1.004002-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 | package Moo::sification;
use strictures 1;
use Moo::_Utils ();
sub unimport { our $disarmed = 1 }
sub Moo::HandleMoose::AuthorityHack::DESTROY {
unless (our $disarmed or Moo::_Utils::_in_global_destruction) {
require Moo::HandleMoose;
Moo::HandleMoose->import;
}
}
if ($INC{"Moose.pm"}) {
require Moo::HandleMoose;
Moo::HandleMoose->import;
} else {
$Moose::AUTHORITY = bless({}, 'Moo::HandleMoose::AuthorityHack');
}
1;
|