|
Lines 98-104
Link Here
|
| 98 |
echo "" |
98 |
echo "" |
| 99 |
echo "$(date) : Building list of modules for reinstall" | tee -a $LOG |
99 |
echo "$(date) : Building list of modules for reinstall" | tee -a $LOG |
| 100 |
echo "Locating modules for reinstall" |
100 |
echo "Locating modules for reinstall" |
| 101 |
for checkfile in `find $PKGDIR -maxdepth 3 -mindepth 3 -name "CONTENTS" |xargs grep -El '/usr/lib*/perl5/' `; do |
101 |
for checkfile in `find $PKGDIR -maxdepth 3 -mindepth 3 -name "CONTENTS" |xargs grep -El '/usr/lib[^/]*/perl5/' `; do |
| 102 |
if [ "`grep -l "${gPERL_VERSION}" $checkfile`x" = "x" ]; then |
102 |
if [ "`grep -l "${gPERL_VERSION}" $checkfile`x" = "x" ]; then |
| 103 |
echo "$checkfile" >> ${MODULES_LIST} |
103 |
echo "$checkfile" >> ${MODULES_LIST} |
| 104 |
fi; |
104 |
fi; |
