use LWP:::Simple;
my $res = get( $target );
if( is_success($res) ){
 ...
}else{
 ...
}