#!/usr/bin/perl

use strict;
use warnings;

use LWP::Parallel::UserAgent;

my $url =
"http://www.ypbooks.co.kr/ypbooks/WebHome/specdm/specdm.jsp?p_isbn=1941700216";

my $ua = LWP::Parallel::UserAgent->new();
   $ua->redirect (1);
   $ua->timeout  (2);
   $ua->max_hosts (3);
   $ua->max_req (3);

my $response = $ua->get( $url );

my $contents =  $response->content;

print $contents;