#!/usr/bin/perl
# cpanel - multi_cpcpan_check_installed           Copyright(c) 2010 cPanel, Inc.
#                                                           All rights Reserved.
# copyright@cpanel.net                                         http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited

BEGIN { unshift @INC, '/usr/local/cpanel'; }

use strict;
use Cpanel::PerlTest ();

my @modules;

# Allow additional modules to be specified via CLI
if (@ARGV) {
    @modules = grep( !/^--[a-z]+/, @ARGV );
}

my $rMODINFO = Cpanel::PerlTest::check_modules( \@modules );
foreach my $mod ( keys %{$rMODINFO} ) {
    my $safemod    = $mod;
    my $safestatus = $rMODINFO->{$mod}->{'status'};
    my $safeversion = $rMODINFO->{$mod}->{'version'};

    $safemod    =~ s/[\n=]/ /g;
    $safestatus =~ s/[\n=]/ /g;
    $safeversion =~ s/[\n=]/ /g;

    print "$safemod=$safestatus=$safeversion\n";
}