do regress tests. --- t/1.t.orig Mon Jun 27 17:50:17 2011 +++ t/1.t Mon Jun 27 17:50:27 2011 @@ -3,3 +3,4 @@ use Test::More tests => 1; BEGIN { use_ok('Net::NTP') }; ######################### +my $ntp = get_ntp_response("pool.ntp.org", 123);