# Part of the Koha Library Software www.koha-community.org
# Licensed under the GPL.
use strict;
use Modern::Perl;
use warnings;
# CPAN modules
use DBI;
# You should have received a copy of the GNU General Public License
# along with Koha; if not, see <http://www.gnu.org/licenses>.
#use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
# - Would also be a good idea to offer to do a backup at this time...
# NOTE: If you do something more than once in here, make it table driven.
# NOTE: Please keep the version in kohaversion.pl up-to-date!
use feature 'say';
# It provides you not only the list of modules BUT ALSO the files that uses those modules.
# utf8 or warnings or other lib use are not taken into account at the moment.
my $dir=C4::Context->config('intranetdir');
qx(grep -r "^ *use" $dir | grep -v "C4\|strict\|vars" >/tmp/modulesKoha.log);
#!/usr/bin/perl
use Carp;
use Data::Dumper;
use diagnostics;
use C4::InstallAuth;
-