#!/bin/sh PERL_MODULE_LIST="/Template /AppConfig /Text/Wrap /File/Spec /Data/Dumper \ /DBD/mysql /DBI /Date/Parse /CGI/Carp /GD/ /Chart/Base \ /XML/Parser /MIME/Parser" find_perl_modules() { find `perl -e 'foreach(@INC){ next if( ! -d $_); print "$_ " unless /^\.$/}'` -name '*.pm' -print|grep "$1" >/dev/null if [ $? -ne 0 ]; then echo "not found: $1"; fi } for W in $PERL_MODULE_LIST do find_perl_modules $W done