#!perl use Test::More; use Test::RequiresInternet ( 'foobar' => 80 ); plan tests => 1; ok(1);