Now that is a handy little script. Thanks! I have a related question . . . where does @INC come from? I guess there is a configuration file somewhere?
-- John # -----Original Message----- # From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of # zentara # Sent: Saturday, July 06, 2002 12:10 PM # To: [EMAIL PROTECTED] # Subject: Re: Modules # # # On Sat, 6 Jul 2002 00:17:04 -0400, [EMAIL PROTECTED] (John Almberg) # wrote: # # >What's an easy way to tell if a particular module is installed # on my server? # >I'm sure I read this somewhere, but can't find it. Thanks! # # I'm guessing you mean remote server , and you want it via a # browser. # # ############################################################ # #!/usr/bin/perl # # print "Content-type: text/html\n\n<pre>"; # for (@INC){ # opendir(LIB, $_) || die "Can't open $_\n$!"; # my @modules = grep { /\.pm$|\.pl$/ } readdir(LIB); # closedir LIB; # print "\n$_\n"; # for (@modules) { # print "$_\n"; # } # } # ############################################################# # # # # # # -- # To unsubscribe, e-mail: [EMAIL PROTECTED] # For additional commands, e-mail: [EMAIL PROTECTED] # -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
