2012/03/26

Search @INC

perldoc -l My::Module

perl -e 'print join " ", @INC, "-name Simple.pm"' | xargs find

perl -e 'print join " ", @INC, "-wholename *Some/Simple.pm"' | xargs find

for inc in $(perl -e 'print join " ", @INC');
do
find $inc -name Simple.pm;
# or: find $inc -wholename *Some/Simple.pm;
done

No comments:

Post a Comment