mebil

[projects.git] / tools / cpan2deb

diff --git a/tools/cpan2deb b/tools/cpan2deb
index 3fb1c47e3e057309bfe73d386b546739471275c4..280e9e48db0ced8ee52cfac8548011b9ea518d40 100755 (executable)
--- a/tools/cpan2deb
+++ b/tools/cpan2deb
@@ -16,33 +16,29 @@ if [ -d build ]; then
        rm -rf build
 fi
 
        rm -rf build
 fi
 

+echo "call CPAN ..."

 cpan -m $1 1>cpan.out 2>&1 || (echo "cpan failed"; exit 1)
 cpan -m $1 1>cpan.out 2>&1 || (echo "cpan failed"; exit 1)

-builddir=$(ls -rt ~/.cpan/build |tail -1)
-cd ~/.cpan/build/$builddir
-perl Makefile.PL PREFIX="~/locallib"
+
+# find build directory
+mname=$1
+name=lib${mname/::/-}-perl
+name=${name,,*}
+#builddir_prefix=${mname/::/-}
+builddir=$(ls -rtd ~/.cpan/build/*/ |tail -1)
+
+cd $builddir
+perl Makefile.PL INSTALL_BASE="~/locallib"

 make
 make install 1>~/cpan.out 2>&1
 echo "Module $1 installed to ~/locallib, output written to cpan.out"
 cd
 
 make
 make install 1>~/cpan.out 2>&1
 echo "Module $1 installed to ~/locallib, output written to cpan.out"
 cd
 

-mkdir build
-
-# build copy file
-#grep "^Installing" cpan.out |sed "s/Installing //" >build/cpan.tmp
+# check version
+version=$(perl -M$mname -e 'print $ARGV[0]->VERSION' $mname)

 
 

+mkdir build

 cd build
 
 cd build
 

-# edit copy file
-#awk '{FS="/";} \
-#/lib/ {print $0" $1/usr/share/perl5";} \
-#/man/ {print $0" $1/usr/share/man";}' cpan.tmp >cpan.cp
-
-# build package name
-version=$(perl -M$1 -e 'print $ARGV[0]->VERSION' $1)
-mname=$1
-name=lib${mname/::/-}-perl
-name=${name,,*}
-

 mkdir -p $name/DEBIAN
 cat << EOF >$name/DEBIAN/control
 Package: $name
 mkdir -p $name/DEBIAN
 cat << EOF >$name/DEBIAN/control
 Package: $name