10http1client.t

use strict;
use warnings;
use Test::More;
use t::Util;

my $fn = bindir() . "/examples-http1client";

plan skip_all => 'http1client not found'
    unless -x $fn;

is(system("$fn http://kazuhooku.com > /dev/null"), 0);

done_testing;