This is the CPAN module Sub::Override. . Perl programmers sometimes have a need to override subroutines, particularly for testing purposes. Sub::Override provides a simple way to override subroutines instead of using heavier-weight methods such as Mock Objects.