view release on metacpan or  search on metacpan

t/App-Kramerius-To-Images/04-run.t  view on Meta::CPAN

# Test.
my $page_uuid = '11a7ffc0-c61e-11e6-ac1c-001018b5eb5c';
my $useragent = Test::LWP::UserAgent->new;
my $uri = 'kramerius.mzk.cz/search/api/v5.0/item/uuid:'.$page_uuid.'/children';
$useragent->map_response(
	qr{$uri},
	HTTP::Response->new(
		'200',
		'OK',
		['Content-Type' => 'application/json;charset=utf-8'],
		'[]',
	),
);
my $temp_dir = tempdir('CLEANUP' => 1);
my $obj = App::Kramerius::To::Images->new(
	'dir_to_store_files' => $temp_dir,
	'lwp_user_agent' => $useragent,
);
@ARGV = (
	'mzk',