The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
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;