Skip to content
Snippets Groups Projects
Commit fda48192 authored by Andreas Romeyke's avatar Andreas Romeyke
Browse files

- fixed namespace clean up

parent a06bb1f9
No related branches found
No related tags found
No related merge requests found
package SLUB::LZA::TA; package SLUB::LZA::TA;
use strict; use strict;
use warnings; use warnings;
use App::Cmd::Setup -app;
use Path::Tiny qw( path ); use Path::Tiny qw( path );
use YAML qw(LoadFile); use YAML qw(LoadFile);
use LWP::UserAgent; use LWP::UserAgent;
...@@ -12,6 +11,11 @@ use Regexp::Optimizer; ...@@ -12,6 +11,11 @@ use Regexp::Optimizer;
use IO::Zlib; use IO::Zlib;
use Text::CSV_PP; use Text::CSV_PP;
use SLUB::LZA::TA::Crypt; use SLUB::LZA::TA::Crypt;
use namespace::clean;
use App::Cmd::Setup -app;
# VERSION # VERSION
......
...@@ -6,6 +6,7 @@ use feature qw(say); ...@@ -6,6 +6,7 @@ use feature qw(say);
use SLUB::LZA::TA::Archivematica::Elasticsearch; use SLUB::LZA::TA::Archivematica::Elasticsearch;
use Data::Printer; use Data::Printer;
use Date::Calc qw(Date_to_Time); use Date::Calc qw(Date_to_Time);
use namespace::autoclean -except => qr{SLUB::LZA::TA::.*};
# VERSION # VERSION
...@@ -111,4 +112,7 @@ sub execute { ...@@ -111,4 +112,7 @@ sub execute {
return 1; return 1;
} }
no Data::Printer;
no Date::Calc;
1; 1;
...@@ -4,7 +4,7 @@ use strict; ...@@ -4,7 +4,7 @@ use strict;
use warnings; use warnings;
use feature qw(say); use feature qw(say);
use SLUB::LZA::TA::Archivematica::Elasticsearch; use SLUB::LZA::TA::Archivematica::Elasticsearch;
use namespace::autoclean;
# VERSION # VERSION
# ABSTRACT: search IEs module for ta-tool # ABSTRACT: search IEs module for ta-tool
......
...@@ -7,7 +7,7 @@ use feature qw(say); ...@@ -7,7 +7,7 @@ use feature qw(say);
use IO::Prompt::Tiny qw/prompt/; use IO::Prompt::Tiny qw/prompt/;
use Crypt::Mode::CBC; use Crypt::Mode::CBC;
use Path::Tiny; use Path::Tiny;
use namespace::autoclean; use namespace::autoclean -except => qr{^SLUB::LZA::TA::.*};
# VERSION # VERSION
......
...@@ -13,6 +13,7 @@ use constant CHR_NULL => chr(NULL); ...@@ -13,6 +13,7 @@ use constant CHR_NULL => chr(NULL);
use constant CHR_ROW_TERMINATOR => chr(ROW_TERMINATOR); use constant CHR_ROW_TERMINATOR => chr(ROW_TERMINATOR);
use List::Util qw(any none); use List::Util qw(any none);
use Date::Calc qw(Date_to_Time); use Date::Calc qw(Date_to_Time);
use namespace::autoclean -except => qr{SLUB::LZA::TA::.*};
# VERSION # VERSION
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment