--- /dev/null
+#!/usr/bin/perl
+
+# This file is part of Koha.
+#
+# Copyright 2019 Koha Development Team
+#
+# Koha is free software; you can redistribute it and/or modify it
+# under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# Koha is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Koha; if not, see <http://www.gnu.org/licenses>.
+
+use Modern::Perl;
+use Getopt::Long;
+use Pod::Usage;
+
+use Koha::Script;
+
+use C4::Context;
+use Koha::Plugins;
+
+my ($help);
+GetOptions( 'help|?' => \$help );
+
+pod2usage(1) if $help;
+
+my $plugins_enabled = C4::Context->preference('UseKohaPlugins')
+ && C4::Context->config("enable_plugins");
+unless ($plugins_enabled) {
+ print
+"The plugin system must be enabled for one to be able to install plugins\n";
+ exit 1;
+}
+
+my @plugins = Koha::Plugins->new()->InstallPlugins();
+
+unless (@plugins) {
+ my $plugins_dir = C4::Context->config("pluginsdir");
+ if ( ref($plugins_dir) eq 'ARRAY' ) {
+ print "No plugins found\n";
+ print "pluginsdir contains: \n" . join( '\n', @{$plugins_dir} );
+ }
+ else {
+ print "No plugins found at $plugins_dir\n";
+ }
+}
+
+for my $plugin (@plugins) {
+ print "Installed "
+ . $plugin->{metadata}->{name}
+ . " version "
+ . $plugin->{metadata}->{version} . "\n";
+}
+
+=head1 NAME
+
+install_plugins.pl - install all plugins found in plugins_dir
+
+=head1 SYNOPSIS
+
+ install_plugins.pl
+
+Options:
+ -?|--help brief help message
+
+=head1 OPTIONS
+
+=over 8
+
+=item B<--help|-?>
+
+Print a brief help message and exits
+
+=back
+
+=head1 DESCRIPTION
+
+A simple script to install plugins from the command line
+
+=cut