sub CheckLWP {
# The following eval/if combination equates to a try/catch combination in C++
eval {
require LWP;
};
if ($@) {
#warn $@;
my ($bad_module) = $@ =~ m/Can't locate (.+?).pm in [EMAIL PROTECTED]/;
print "Failed to load Perl module: \'$bad_module\' did not load\n";
exit;
}
}
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Arijit Das
Sent: Wednesday, July 27, 2005 12:46 PM
To: ActivePerl@listserv.ActiveState.com; perl-unix-users@listserv.ActiveState.com
Subject: [Perl-unix-users] Checking Perl Module installed - How?
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Arijit Das
Sent: Wednesday, July 27, 2005 12:46 PM
To: ActivePerl@listserv.ActiveState.com; perl-unix-users@listserv.ActiveState.com
Subject: [Perl-unix-users] Checking Perl Module installed - How?
Hi,
How can I check if a Perl Module is installed in my System from a Perl
Program?
I want to do something like this:
#!/usr/local/bin/perl
if (<Quota Module is installed in my system>) {
use Quota;
}
Any help is appreciated.
Thanks,
Arijit
Start your day with Yahoo! - make it your home page
_______________________________________________ Perl-Unix-Users mailing list Perl-Unix-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs