scripts/installation_check.pl

   1 #!/usr/bin/perl -w
   2
   3 BEGIN {
   4   push(@INC, "modules");
   5 }
   6
   7 use SL::InstallationCheck;
   8
   9 $| = 1;
  10
  11 foreach my $module (@SL::InstallationCheck::required_modules) {
  12   print("Looking for $module->{name}...");
  13   if (!SL::InstallationCheck::module_available($module->{"name"})) {
  14     print(" NOT found\n" .
  15           "  The module '$module->{name}' is not available on your system.\n" .
  16           "  Please install it with the CPAN shell, e.g.\n" .
  17           "    perl -MCPAN -e \"install $module->{name}\"\n" .
  18           "  or download it from this URL and install it manually:\n" .
  19           "    $module->{url}\n\n");
  20   } else {
  21     print(" ok\n");
  22   }
  23 }