Add a function to automatically mock all subroutine with a no-op or die function.

[shinglyu]

Sometimes when I mock I forgot to mock some subroutine and the unit test calls the real module, causing hard-to-debug tests. It would be nice to have a function that can automatically mock all subroutines of a module with a no-op implementation or sub { die }, so if we forgot to mock a subroutine, the whole test will fail early.

Something like

my $module = Test::MockModule->new('Foo');
$module->auto_mock_all();

Foo->bar(); # dies, or simply no-op

[shinglyu]

I'm trying to implement this but I'm stuck at how to get all subroutines of a module, I tried keys %Module:: but sometimes I got things that is not a function. Any tips?

[toddr]

A Example of getting the subs out of Safe might be:

perl -MSafe -E'my @subs = grep { Safe->can($_) } keys %Safe::; say foreach @subs'

[toddr]

YMMV on inheritance. Just the same I like the idea!