perlcritic: use strict, use warnings

This commit is contained in:
Your Name
2021-08-19 16:36:43 -04:00
committed by Graham Christensen
parent d3feb8b9a5
commit 4677a7c894
92 changed files with 103 additions and 1 deletions

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
my %ctx = test_init(hydra_config => q|

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
my %ctx = test_init(

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
my %ctx = test_init(hydra_config => q|

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use Data::Dumper;
my %ctx = test_init();

View File

@ -1,5 +1,6 @@
use feature 'unicode_strings';
use strict;
use warnings;
use Setup;
use IO::Uncompress::Bunzip2 qw(bunzip2);
use Archive::Tar;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use Data::Dumper;
my %ctx = test_init();

View File

@ -1,5 +1,6 @@
use feature 'unicode_strings';
use strict;
use warnings;
use Setup;
use JSON qw(decode_json encode_json);

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use Data::Dumper;
my %ctx = test_init();

View File

@ -1,5 +1,6 @@
use feature 'unicode_strings';
use strict;
use warnings;
use Setup;
use JSON qw(decode_json encode_json);

View File

@ -1,5 +1,6 @@
use feature 'unicode_strings';
use strict;
use warnings;
use Setup;
use JSON qw(decode_json encode_json);

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Hydra::Event;
use Test2::V0;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use Data::Dumper;
use Test2::V0;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use JSON;
use File::Copy;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,5 +1,6 @@
use feature 'unicode_strings';
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use TestScmInput;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use TestScmInput;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use TestScmInput;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use TestScmInput;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use TestScmInput;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use TestScmInput;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use TestScmInput;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use TestScmInput;

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use Setup;
use TestScmInput;

View File

@ -1,6 +1,7 @@
package Setup;
use strict;
use warnings;
use Exporter;
use Test::PostgreSQL;
use File::Temp;

View File

@ -1,5 +1,6 @@
use feature 'unicode_strings';
use strict;
use warnings;
use Setup;
my %ctx = test_init(

View File

@ -1,4 +1,5 @@
use strict;
use warnings;
use File::Basename;
use Hydra::Model::DB;
use Hydra::Helper::Nix;

View File

@ -1,5 +1,6 @@
use feature 'unicode_strings';
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,5 +1,6 @@
use feature 'unicode_strings';
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,5 +1,6 @@
use feature 'unicode_strings';
use strict;
use warnings;
use Setup;
my %ctx = test_init();

View File

@ -1,3 +1,5 @@
use strict;
use warnings;
use LWP::UserAgent;
use JSON;