Skip to content

Commit 3f2d1cc

Browse files
committed
Apply perlimports to tests
1 parent b4b1d60 commit 3f2d1cc

File tree

3 files changed

+11
-11
lines changed

3 files changed

+11
-11
lines changed

t/cookies.t

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1,10 +1,11 @@
11
#!perl -w
22

3-
use Test::More tests => 79;
3+
use HTTP::Cookies ();
4+
use HTTP::Request ();
5+
use HTTP::Response ();
6+
use URI ();
47

5-
use HTTP::Cookies;
6-
use HTTP::Request;
7-
use HTTP::Response;
8+
use Test::More tests => 79;
89

910
#-------------------------------------------------------------------
1011
# First we check that it works for the original example at
@@ -443,7 +444,6 @@ $c->extract_cookies($res);
443444

444445
print $c->as_string;
445446

446-
require URI;
447447
$req = HTTP::Request->new(POST => URI->new("http://foo.bar.acme.com/foo"));
448448
$c->add_cookie_header($req);
449449
#print $req->as_string;

t/issue26.t

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,8 @@
11
use strict;
22
use Test::More;
3-
use HTTP::Cookies;
4-
use HTTP::Response;
5-
use HTTP::Request;
3+
use HTTP::Cookies ();
4+
use HTTP::Response ();
5+
use HTTP::Request ();
66

77
my $CRLF="\015\012";
88

t/issue32.t

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -2,9 +2,9 @@ use strict;
22
use warnings;
33
use Test::More;
44

5-
use HTTP::Cookies;
6-
use HTTP::Request;
7-
use HTTP::Response;
5+
use HTTP::Cookies ();
6+
use HTTP::Request ();
7+
use HTTP::Response ();
88

99
my $nextyear = 1901+(gmtime())[5];
1010

0 commit comments

Comments
 (0)