use strict;
use warnings;

use HTTP::Tiny;
use Test::Mock::HTTP::Tiny;
 
my $http = HTTP::Tiny->new;
my $resp = $http->get('http://www.way-finder.uk/');

open my $fh, '>', 'mock_html.dat';
print $fh Test::Mock::HTTP::Tiny->captured_data_dump;
close $fh;