yl197837 发表于 2018-8-31 12:11:02

批量安装perl-cpan库文件

#! /bin/bash  #mv /root/cpan/mysql-mmm-* /root
  pathname="/usr/lib/perl5/site_perl/5.8.8/i386-linux-thread-multi/DBD"
  cpanpath=/root/cpan
  echo "/usr/local/mysql/lib/mysql/" >> /etc/ld.so.conf
  ldconfig
  file1="DBD-mysql-4.020.tar.gz"
  file2="perl-DBI-1.52-2.el5.i386.rpm"
  ls $cpanpath > /root/file
  while read i
  do
  file3=$(rpm -qa perl-DBI |awk -F "1" '{print $1}')
  if [ "$file3" != "perl-DBI-" ]
  then
  rpm -ivh $cpanpath/$i
  sleep 2
  #                mv /root/cpan/perl-DBI* /root
  else
  if [ -d $pathname ]
  then
  tar xf $cpanpath/$i -C /tmp && cd /tmp/$(echo $i |awk -F ".tar" '{print $1}')
  perl Makefile.PL && make test && make install
  mv $cpanpath/$i /root
  else
  if [ "$i" = "$file1" ]
  then
  tar xf $cpanpath/$i -C /tmp && cd /tmp/$(echo $i |awk -F ".tar" '{print $1}')
  perl Makefile.PL --mysql_config=/usr/local/mysql/bin/mysql_config --with-mysql=/usr/local/mysql && make test && make install&& mv $cpanpath/$i /root
  continue
  fi
  fi
  fi
  done < /root/file
  for j in `ls /root/cpan`
  do
  tar xf $cpanpath/$j -C /tmp && cd /tmp/$(echo $j |awk -F ".tar" '{print $1}')
  perl Makefile.PL && make test && make install
  mv $cpanpath/$j /root
  done
  tar xf /root/mysql-mmm* -C /tmp && cd /tmp/mysql-mmm* && make install
  rm -rf /root/file

页: [1]
查看完整版本: 批量安装perl-cpan库文件