Test-mock-recorder is a project mainly written in Perl, it's free.
Record-and-verify style mocking library for Perl
=pod
=head1 Test::Mock::Recorder
Test::Mock::Recorder is record-and-verify style mock library for Perl 5.
You can download "released" version from Lhttp://search.cpan.org/dist/Test-Mock-Recorder/.
And you can see in-development version from Lhttps://github.com/kzys/test-mock-recorder.
=cut