diff --git a/labels/label-edit-layout.pl b/labels/label-edit-layout.pl index c9ca26c162..f1fc6878a1 100755 --- a/labels/label-edit-layout.pl +++ b/labels/label-edit-layout.pl @@ -21,7 +21,7 @@ use Modern::Perl; use CGI qw ( -utf8 ); -use POSIX qw( exit sprintf ); +use POSIX; use C4::Auth qw( get_template_and_user ); use C4::Output qw( output_html_with_http_headers ); diff --git a/misc/bin/connexion_import_daemon.pl b/misc/bin/connexion_import_daemon.pl index 722e2bfa13..c7e06c3a7d 100755 --- a/misc/bin/connexion_import_daemon.pl +++ b/misc/bin/connexion_import_daemon.pl @@ -90,7 +90,7 @@ use Carp qw( croak ); use IO::Socket::INET qw( SOCK_STREAM ); # use IO::Socket::IP; use IO::Select; -use POSIX qw( close exit fork localtime open printf sprintf ); +use POSIX; use HTTP::Status qw( HTTP_FORBIDDEN HTTP_UNAUTHORIZED ); use strict; use warnings; diff --git a/misc/cronjobs/rss/rss.pl b/misc/cronjobs/rss/rss.pl index d107411044..cfdd078b42 100755 --- a/misc/cronjobs/rss/rss.pl +++ b/misc/cronjobs/rss/rss.pl @@ -31,7 +31,7 @@ use Template; use Koha::Script -cron; use C4::Context; -use POSIX qw( close localtime open strftime ); +use POSIX; my $dbh = C4::Context->dbh; my $file = $ARGV[0]; diff --git a/misc/migration_tools/22_to_30/export_Authorities.pl b/misc/migration_tools/22_to_30/export_Authorities.pl index d4531a3ffc..3c5eb116f7 100755 --- a/misc/migration_tools/22_to_30/export_Authorities.pl +++ b/misc/migration_tools/22_to_30/export_Authorities.pl @@ -10,7 +10,7 @@ use C4::Context; #use MARC::File::XML(BinaryEncoding=>"utf8"); #use MARC::File::USMARC; use C4::AuthoritiesMarc; -use POSIX qw( close localtime sprintf time ); +use POSIX; #MARC::File::XML::default_record_format("UNIMARCAUTH"); my $dbh = C4::Context->dbh; my $rq= $dbh->prepare(qq| diff --git a/misc/migration_tools/22_to_30/export_Authorities_xml.pl b/misc/migration_tools/22_to_30/export_Authorities_xml.pl index 4145fc33b0..ab058b5b04 100755 --- a/misc/migration_tools/22_to_30/export_Authorities_xml.pl +++ b/misc/migration_tools/22_to_30/export_Authorities_xml.pl @@ -9,7 +9,7 @@ BEGIN { use C4::Context; use MARC::File::XML(BinaryEncoding=>"utf8"); use C4::AuthoritiesMarc; -use POSIX qw( close localtime open sprintf time ); +use POSIX; MARC::File::XML::default_record_format("UNIMARCAUTH"); my $dbh = C4::Context->dbh; my $rq= $dbh->prepare(qq| diff --git a/misc/translator/xgettext.pl b/misc/translator/xgettext.pl index fcfe1bdd76..1d7a5d7c1b 100755 --- a/misc/translator/xgettext.pl +++ b/misc/translator/xgettext.pl @@ -27,7 +27,7 @@ use lib $FindBin::Bin; use strict; use warnings; use Getopt::Long qw( GetOptions ); -use POSIX qw( close exit localtime open printf time ); +use POSIX; use Locale::PO; use TmplTokenizer; use VerboseWarnings;