perl -p -i -e 's/use vars qw\(\s*\);\n//' **/*.pm
Signed-off-by: Josef Moravec <josef.moravec@gmail.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@unc.edu.ar>
Signed-off-by: Brendan A Gallagher <brendan@bywatersolutions.com>
use C4::Auth qw/get_session/;
use Digest::MD5;
-use vars qw();
BEGIN {
}
use strict;
use warnings;
-use vars qw();
=head1 NAME
use strict;
use warnings;
-use vars qw();
=head1 NAME
use warnings;
use Library::CallNumber::LC;
-use vars qw();
=head1 NAME
use C4::Context;
use MARC::Record;
-use vars qw();
BEGIN {
}
#use warnings; FIXME - Bug 2505
use C4::Context;
-use vars qw();
BEGIN {
}
use warnings;
use C4::Context;
-use vars qw();
BEGIN {
}
use C4::Context;
-use vars qw( );
BEGIN {
}
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-use vars qw();
use C4::Context;
use C4::Output;
use Modern::Perl;
-use vars qw();
use C4::Context;
use C4::Output;
use strict;
use warnings;
-use vars qw( );
use base qw( Template::Plugin );
use Template::Plugin;
use C4::Context;