#!/bin/sh
# Build and install perl for Slackware
# volkerdi@slackware.com
CWD=`pwd`
cd /tmp
tar xzvf $CWD/perl-5.6.0.tar.gz
tar xzvf $CWD/DBI-1.13.tar.gz
tar xzvf $CWD/Data-ShowTable-3.3.tar.gz
cd perl-5.6.0
zcat $CWD/perl-5.6.0-binmail.diff.gz | patch -p1
mkdir -p /usr/doc/perl-5.6.0
cp -a AUTHORS Artistic Copying INSTALL MAINTAIN MANIFEST README \
  README.Y2K README.threads Todo Todo-5.6 /usr/doc/perl-5.6.0
# make and install regular perl:
./Configure -de \
            -Dprefix=/usr \
            -Darchname=i386-linux \
            -Dprivlib=/usr/lib/perl5 \
            -Darchlib=/usr/lib/perl5/i386-linux \
            -Dsitelib=/usr/lib/perl5/site_perl \
            -Dsitearch=/usr/lib/perl5/site_perl/i386-linux
make
make install
# make and install suidperl:
make clean
make suidperl
cp suidperl /usr/bin/suidperl5.6.0
chmod 4711 /usr/bin/suidperl5.6.0
# make and install DBI modules and docs:
cd /tmp/DBI-1.13
mkdir -p /usr/doc/perl-5.6.0/DBI-1.13
cp -a MANIFEST README ToDo /usr/doc/perl-5.6.0/DBI-1.13
perl Makefile.PL
make
make test
make install
# make and install Data-Showtable and docs:
cd /tmp/Data-ShowTable-3.3
mkdir -p /usr/doc/perl-5.6.0/Data-ShowTable-3.3
cp -a Copyright GNU-LICENSE MANIFEST README *.html /usr/doc/perl-5.6.0/Data-ShowTable-3.3
perl Makefile.PL
make
make test
make install
# Chown docs to root.root:
find /usr/doc/perl-5.6.0 -type f | xargs chmod 644
chown -R root.root /usr/doc/perl-5.6.0/*
( cd /usr/bin
  ln -sf perl5.6.0 perl
  ln -sf suidperl5.6.0 suidperl 
  ln -sf c2ph pstruct )