subtest to restrict scope
examples/test-more/t/subtest_scope.t
use strict; use warnings; use HTTP::CookieJar::LWP (); use LWP::UserAgent (); use Test::More; subtest first => sub { my $jar = HTTP::CookieJar::LWP->new; my $ua = LWP::UserAgent->new( cookie_jar => $jar, protocols_allowed => ['http', 'https'], timeout => 10, ); my $response = $ua->get('https://google.com/'); ok $response->is_success; diag $jar->dump_cookies; }; subtest second => sub { my $jar = HTTP::CookieJar::LWP->new; my $ua = LWP::UserAgent->new( cookie_jar => $jar, protocols_allowed => ['http', 'https'], timeout => 10, ); my $response = $ua->get('https://google.com/'); ok $response->is_success; diag $jar->dump_cookies; }; done_testing;