package Redefined;
use strict;
use warnings;
use Function::Parameters qw(:strict);
use Carp qw/croak/;

method meth1 {}

method meth1 {}

# this one should not trigger a redfined warning
sub meth2 {}
method meth2 {}

# This one shouldn't either
method meth3 {}
{ no warnings 'redefine';
  method meth3 {}
}
1;