#!/usr/bin/perl
use Modern::Perl;
-use Getopt::Long;
-use Pod::Usage;
-use Time::HiRes qw(gettimeofday);
+use Getopt::Long qw( GetOptions );
+use Pod::Usage qw( pod2usage );
+use Time::HiRes qw( gettimeofday );
use Koha::Script -cron;
use C4::AuthoritiesMarc;