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