The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package Moo::_strictures;
use strict;
use warnings;

sub import {
  if ($ENV{MOO_FATAL_WARNINGS}) {
    require strictures;
    strictures->VERSION(2);
    @_ = ('strictures');
    goto &strictures::import;
  }
  else {
    strict->import;
    warnings->import;
    warnings->unimport('once');
  }
}

1;