P5-catalystx-test-recorder is a project mainly written in Perl, it's free.
Generate tests from HTTP requests
lib/CatalystX/Test/Recorder.pm