perlimports -i t

Author: oalders

t/00_setup.t

@@ -5,16 +5,14 @@ use lib 't/lib';
 use CPAN::Faker 0.010 ();
 use Devel::Confess;
 use MetaCPAN::Script::Tickets ();
-use MetaCPAN::Server::Test;
-use MetaCPAN::TestHelpers qw(
+use MetaCPAN::TestHelpers     qw(
     fakecpan_configs_dir
     fakecpan_dir
     get_config
     tmp_dir
     write_find_ls
 );
 use MetaCPAN::TestServer ();
-use Module::Faker 0.015  ();    # Generates META.json.
 use Test::More 0.96;
 use URI::FromHash qw( uri );
 

t/01_darkpan.t

@@ -3,9 +3,9 @@ use warnings;
 use lib 't/lib';
 
 use Devel::Confess;
-use MetaCPAN::DarkPAN ();
-use MetaCPAN::TestServer;
-use MetaCPAN::Tests::Controller::Search::DownloadURL;
+use MetaCPAN::DarkPAN                                ();
+use MetaCPAN::TestServer                             ();
+use MetaCPAN::Tests::Controller::Search::DownloadURL ();
 use Test::More;
 use Test::RequiresInternet ( 'cpan.metacpan.org' => 80 );
 

t/api/controller/cover.t

@@ -2,8 +2,7 @@ use Mojo::Base -strict;
 
 use lib 't/lib';
 
-use MetaCPAN::Model::Search ();
-use MetaCPAN::TestServer    ();
+use MetaCPAN::TestServer ();
 use Test::More;
 use Test::Mojo ();
 

t/lib/MetaCPAN/DarkPAN.pm

@@ -2,14 +2,13 @@ package MetaCPAN::DarkPAN;
 
 use MetaCPAN::Moose;
 
-use CPAN::Repository::Perms;
-use MetaCPAN::TestHelpers     qw( get_config write_find_ls );
+use CPAN::Repository::Perms   ();
+use MetaCPAN::TestHelpers     qw( write_find_ls );
 use MetaCPAN::Types::TypeTiny qw( Path );
 use MetaCPAN::Util            qw( author_dir );
-use OrePAN2::Indexer;
-use OrePAN2::Injector;
-use Path::Tiny    qw( path );
-use URI::FromHash qw( uri_object );
+use OrePAN2::Indexer          ();
+use OrePAN2::Injector         ();
+use URI::FromHash             qw( uri_object );
 
 has base_dir => (
     is      => 'ro',

t/lib/MetaCPAN/Server/Test.pm

@@ -3,9 +3,9 @@ package MetaCPAN::Server::Test;
 use strict;
 use warnings;
 
-use HTTP::Request::Common qw(POST GET DELETE);
+use HTTP::Request::Common qw( DELETE GET POST );
 use MetaCPAN::Server      ();
-use Plack::Test;
+use Plack::Test           qw( test_psgi );
 use Test::More;
 
 use base 'Exporter';
@@ -37,7 +37,7 @@ sub app {
     return $app;
 }
 
-require MetaCPAN::Model;
+use MetaCPAN::Model ();
 
 sub model {
     MetaCPAN::Model->new( es => ( $ENV{ES_TEST} ||= 'localhost:9200' ) );

t/lib/MetaCPAN/TestHelpers.pm

@@ -4,16 +4,16 @@ use warnings;
 package    # no_index
     MetaCPAN::TestHelpers;
 
-use Cpanel::JSON::XS;
-use File::Copy  qw( copy );
-use File::pushd qw( pushd );
-use FindBin;
-use MetaCPAN::Util qw( checkout_root );
-use MetaCPAN::Script::Runner;
-use Path::Tiny qw( path );
+use Cpanel::JSON::XS         qw( decode_json encode_json );
+use File::Copy               qw( copy );
+use File::pushd              qw( pushd );
+use FindBin                  ();
+use MetaCPAN::Util           qw( checkout_root );
+use MetaCPAN::Script::Runner ();
+use Path::Tiny               qw( path );
 use Test::More;
-use Test::Routine::Util;
-use Try::Tiny qw( catch try );
+use Test::Routine::Util qw( run_tests );
+use Try::Tiny           qw( catch finally try );
 
 use base 'Exporter';
 our @EXPORT = qw(

t/lib/MetaCPAN/TestServer.pm

@@ -2,24 +2,23 @@ package MetaCPAN::TestServer;
 
 use MetaCPAN::Moose;
 
-use MetaCPAN::DarkPAN                ();
-use MetaCPAN::Script::Author         ();
-use MetaCPAN::Script::Cover          ();
-use MetaCPAN::Script::CPANTestersAPI ();
-use MetaCPAN::Script::Favorite       ();
-use MetaCPAN::Script::First          ();
-use MetaCPAN::Script::Latest         ();
-use MetaCPAN::Script::Mapping        ();
-use MetaCPAN::Script::Mapping::Cover ();
-use MetaCPAN::Script::Mirrors        ();
-use MetaCPAN::Script::Package        ();
-use MetaCPAN::Script::Permission     ();
-use MetaCPAN::Script::Release        ();
-use MetaCPAN::Server                 ();
-use MetaCPAN::TestHelpers            qw( fakecpan_dir );
-use MetaCPAN::Types::TypeTiny        qw( Path HashRef Str );
-use Search::Elasticsearch;
-use Search::Elasticsearch::TestServer;
+use MetaCPAN::Script::Author          ();
+use MetaCPAN::Script::Cover           ();
+use MetaCPAN::Script::CPANTestersAPI  ();
+use MetaCPAN::Script::Favorite        ();
+use MetaCPAN::Script::First           ();
+use MetaCPAN::Script::Latest          ();
+use MetaCPAN::Script::Mapping         ();
+use MetaCPAN::Script::Mapping::Cover  ();
+use MetaCPAN::Script::Mirrors         ();
+use MetaCPAN::Script::Package         ();
+use MetaCPAN::Script::Permission      ();
+use MetaCPAN::Script::Release         ();
+use MetaCPAN::Server                  ();
+use MetaCPAN::TestHelpers             qw( fakecpan_dir );
+use MetaCPAN::Types::TypeTiny         qw( HashRef Path Str );
+use Search::Elasticsearch             ();
+use Search::Elasticsearch::TestServer ();
 use Test::More;
 use Try::Tiny qw( catch try );
 

t/lib/MetaCPAN/Tests/Controller/Search/DownloadURL.pm

@@ -3,8 +3,8 @@ package MetaCPAN::Tests::Controller::Search::DownloadURL;
 use strict;
 use warnings;
 
-use MetaCPAN::Server::Test;
-use MetaCPAN::TestHelpers;
+use MetaCPAN::Server::Test qw( app GET test_psgi );
+use MetaCPAN::TestHelpers  qw( decode_json_ok );
 use Moose;
 use Test::More;
 

t/lib/MetaCPAN/Tests/Model.pm

@@ -5,7 +5,7 @@ use Test::Routine;
 use MetaCPAN::Server::Test    ();
 use MetaCPAN::Types::TypeTiny qw( ArrayRef HashRef Str );
 use Test::More;
-use Try::Tiny qw( catch try );
+use Try::Tiny qw( try );
 
 with qw(
     MetaCPAN::Tests::Extra

t/lib/MetaCPAN/Tests/Release.pm

@@ -4,8 +4,8 @@ use Test::Routine;
 
 use version;
 
-use HTTP::Request::Common;
-use List::Util ();
+use HTTP::Request::Common qw( GET );
+use List::Util            ();
 use Test::More;
 use MetaCPAN::Types::TypeTiny qw( ArrayRef HashRef Str );