no warnings 'redefine';
package Time::Piece;
sub _mktime { ... }