4 files changed, 160 insertions, 0 deletions
diff --git a/perl/perl-Carp-Clan/README b/perl/perl-Carp-Clan/README
new file mode 100644
index 0000000000..f65f5efb04
--- /dev/null
+++ b/perl/perl-Carp-Clan/README
@@ -0,0 +1,20 @@
+Carp::Clan - Report errors from perspective of caller of a "clan" of modules.
+
+This module is based on "Carp.pm" from Perl 5.005_03. It has been modified to
+skip all package names matching the pattern given in the "use" statement
+inside the "qw()" term (or argument list).
+Suppose you have a family of modules or classes named "Pack::A", "Pack::B" and
+so on, and each of them uses "Carp::Clan qw(^Pack::);" (or at least the one in
+which the error or warning gets raised).
+Thus when for example your script "tool.pl" calls module "Pack::A", and module
+"Pack::A" calls module "Pack::B", an exception raised in module "Pack::B" will
+appear to have originated in "tool.pl" where "Pack::A" was called, and not in
+"Pack::A" where "Pack::B" was called, as the unmodified "Carp.pm" would try to
+make you believe :-).
+This works similarly if "Pack::B" calls "Pack::C" where the exception is
+raised, etcetera.
+In other words, this blames all errors in the "Pack::*" modules on the user of
+these modules, i.e., on you. ;-)
+
+For more informations, see:
+http://search.cpan.org/dist/Carp-Clan/lib/Carp/Clan.pod
diff --git a/perl/perl-Carp-Clan/perl-Carp-Clan.SlackBuild b/perl/perl-Carp-Clan/perl-Carp-Clan.SlackBuild
new file mode 100644
index 0000000000..7c76d23a5a
--- /dev/null
+++ b/perl/perl-Carp-Clan/perl-Carp-Clan.SlackBuild
@@ -0,0 +1,111 @@
+#!/bin/sh
+
+# Slackware build script for perl-Carp-Clan
+
+# Copyright 2009-2010 Marco Bonetti <sid77@slackware.it>
+# All rights reserved.
+#
+# Redistribution and use of this script, with or without modification, is
+# permitted provided that the following conditions are met:
+#
+# 1. Redistributions of this script must retain the above copyright
+#    notice, this list of conditions and the following disclaimer.
+#
+# THIS SOFTWARE IS PROVIDED BY THE AUTHOR ''AS IS'' AND ANY EXPRESS OR IMPLIED
+# WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+# MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO
+# EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+# SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+# PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
+# OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+# WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
+# OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
+# ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+PRGNAM=perl-Carp-Clan
+VERSION=${VERSION:-6.04}
+BUILD=${BUILD:-1}
+TAG=${TAG:-_SBo}
+
+SRC_PRGNAM=Carp-Clan
+DOCS="README"
+
+# Automatically determine the architecture we're building on:
+if [ -z "$ARCH" ]; then
+  case "$( uname -m )" in
+    i?86) ARCH=i486 ;;
+    arm*) ARCH=arm ;;
+    # Unless $ARCH is already set, use uname -m for all other archs:
+       *) ARCH=$( uname -m ) ;;
+  esac
+fi
+
+CWD=$(pwd)
+TMP=${TMP:-/tmp/SBo}
+PKG=$TMP/package-$PRGNAM
+OUTPUT=${OUTPUT:-/tmp}
+
+if [ "$ARCH" = "i486" ]; then
+  SLKCFLAGS="-O2 -march=i486 -mtune=i686"
+  LIBDIRSUFFIX=""
+elif [ "$ARCH" = "i686" ]; then
+  SLKCFLAGS="-O2 -march=i686 -mtune=i686"
+  LIBDIRSUFFIX=""
+elif [ "$ARCH" = "x86_64" ]; then
+  SLKCFLAGS="-O2 -fPIC"
+  LIBDIRSUFFIX="64"
+else
+  SLKCFLAGS="-O2"
+  LIBDIRSUFFIX=""
+fi
+
+set -e
+
+rm -rf $PKG
+mkdir -p $TMP $PKG $OUTPUT
+cd $TMP
+rm -rf $SRC_PRGNAM-$VERSION
+tar xvf $CWD/$SRC_PRGNAM-$VERSION.tar.gz
+cd $SRC_PRGNAM-$VERSION
+chown -R root:root .
+find . \
+ \( -perm 777 -o -perm 775 -o -perm 711 -o -perm 555 -o -perm 511 \) \
+ -exec chmod 755 {} \; -o \
+ \( -perm 666 -o -perm 664 -o -perm 600 -o -perm 444 -o -perm 440 -o -perm 400 \) \
+ -exec chmod 644 {} \;
+
+perl Makefile.PL INSTALLDIRS=perl
+make
+make test
+make install DESTDIR=$PKG
+
+# Move man pages
+mv $PKG/usr/share/man $PKG/usr/
+
+# Compress man pages
+( cd $PKG/usr/man
+  find . -type f -exec gzip -9 {} \;
+  for i in $( find . -type l ) ; do ln -s $( readlink $i ).gz $i.gz ; rm $i ; done
+)
+
+# Remove perllocal.pod and other special files that don't need to be installed
+( cd $PKG
+  # Remove 'special' files
+  find . -name perllocal.pod \
+    -o -name ".packlist" \
+    -o -name "*.bs" \
+    | xargs rm -f
+)
+
+# Remove empty directories
+find $PKG -depth -type d -empty -delete
+
+mkdir -p $PKG/usr/doc/$PRGNAM-$VERSION
+cp -a $DOCS $PKG/usr/doc/$PRGNAM-$VERSION
+cat $CWD/$PRGNAM.SlackBuild > $PKG/usr/doc/$PRGNAM-$VERSION/$PRGNAM.SlackBuild
+
+mkdir -p $PKG/install
+cat $CWD/slack-desc > $PKG/install/slack-desc
+
+cd $PKG
+/sbin/makepkg -l y -c n $OUTPUT/$PRGNAM-$VERSION-$ARCH-$BUILD$TAG.${PKGTYPE:-tgz}
diff --git a/perl/perl-Carp-Clan/perl-Carp-Clan.info b/perl/perl-Carp-Clan/perl-Carp-Clan.info
new file mode 100644
index 0000000000..06f60268c2
--- /dev/null
+++ b/perl/perl-Carp-Clan/perl-Carp-Clan.info
@@ -0,0 +1,10 @@
+PRGNAM="perl-Carp-Clan"
+VERSION="6.04"
+HOMEPAGE="http://search.cpan.org/dist/Carp-Clan/"
+DOWNLOAD="http://search.cpan.org/CPAN/authors/id/S/ST/STBEY/Carp-Clan-6.04.tar.gz"
+MD5SUM="b6316bc51bb530d994f2784615939fb2"
+DOWNLOAD_x86_64=""
+MD5SUM_x86_64=""
+MAINTAINER="Marco Bonetti"
+EMAIL="sid77@slackware.it"
+APPROVED="Erik Hanson"
diff --git a/perl/perl-Carp-Clan/slack-desc b/perl/perl-Carp-Clan/slack-desc
new file mode 100644
index 0000000000..a04567e534
--- /dev/null
+++ b/perl/perl-Carp-Clan/slack-desc
@@ -0,0 +1,19 @@
+# HOW TO EDIT THIS FILE:
+# The "handy ruler" below makes it easier to edit a package description.  Line
+# up the first '|' above the ':' following the base package name, and the '|'
+# on the right side marks the last column you can put a character in.  You must
+# make exactly 11 lines for the formatting to be correct.  It's also
+# customary to leave one space after the ':'.
+
+              |-----handy-ruler-------------------------------------------------------|
+perl-Carp-Clan: perl-Carp-Clan (error reporting module)
+perl-Carp-Clan:
+perl-Carp-Clan: Carp::Clan report errors from perspective of caller of a "clan" of
+perl-Carp-Clan: modules.
+perl-Carp-Clan:
+perl-Carp-Clan:
+perl-Carp-Clan:
+perl-Carp-Clan:
+perl-Carp-Clan:
+perl-Carp-Clan:
+perl-Carp-Clan: