eval "use warnings;";
  if ($@) {
    eval q{
      package warnings;
      sub import {};
      sub unimport {};
    };
  };