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;