4 files changed, 137 insertions, 0 deletions
diff --git a/perl/perl-MusicBrainz-DiscID/README b/perl/perl-MusicBrainz-DiscID/README
new file mode 100644
index 0000000000000..1b22bbd65d5a8
--- /dev/null
+++ b/perl/perl-MusicBrainz-DiscID/README
@@ -0,0 +1,4 @@
+MusicBrainz::DiscID is a Perl module -- described by its author as "a class 
+to calculate a MusicBrainz DiscID from an audio CD in the drive. The coding 
+style is slightly different to the C interface to libdiscid, because it makes 
+use of perl's Object Oriented functionality."
diff --git a/perl/perl-MusicBrainz-DiscID/perl-MusicBrainz-DiscID.SlackBuild b/perl/perl-MusicBrainz-DiscID/perl-MusicBrainz-DiscID.SlackBuild
new file mode 100644
index 0000000000000..081ec828f911e
--- /dev/null
+++ b/perl/perl-MusicBrainz-DiscID/perl-MusicBrainz-DiscID.SlackBuild
@@ -0,0 +1,101 @@
+#!/bin/sh
+
+# Slackware build script for perl-MusicBrainz-DiscID 
+
+# Copyright 2012 Glenn Becker, Arlington, Massachusetts, USA
+# 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-MusicBrainz-DiscID
+VERSION=${VERSION:-0.03}
+BUILD=${BUILD:-1}
+TAG=${TAG:-_SBo}
+
+SRCNAM="$(printf $PRGNAM | cut -d- -f2-)"
+
+if [ -z "$ARCH" ]; then
+  case "$( uname -m )" in
+    i?86) ARCH=i486 ;;
+    arm*) ARCH=arm ;;
+       *) 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 $SRCNAM-$VERSION
+tar xvf $CWD/$SRCNAM-$VERSION.tar.gz
+cd $SRCNAM-$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 Build.PL \
+  prefix=/usr \
+  installdirs=vendor \
+  destdir=$PKG
+./Build
+./Build test
+./Build install \
+  --install_path bindoc=/usr/man/man1 \
+  --install_path libdoc=/usr/man/man3
+
+find $PKG/usr/man -type f -exec gzip -9 {} \;
+for i in $( find $PKG/usr/man -type l ) ; do ln -s $( readlink $i ).gz $i.gz ; rm $i ; done
+
+find $PKG -name perllocal.pod -o -name ".packlist" -o -name "*.bs" | xargs rm -f || true
+
+find $PKG -depth -type d -empty -delete || true
+
+mkdir -p $PKG/usr/doc/$PRGNAM-$VERSION
+cp -a \
+  Changes README \
+  $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-MusicBrainz-DiscID/perl-MusicBrainz-DiscID.info b/perl/perl-MusicBrainz-DiscID/perl-MusicBrainz-DiscID.info
new file mode 100644
index 0000000000000..e4b6ae0f13e55
--- /dev/null
+++ b/perl/perl-MusicBrainz-DiscID/perl-MusicBrainz-DiscID.info
@@ -0,0 +1,10 @@
+PRGNAM="perl-MusicBrainz-DiscID"
+VERSION="0.03"
+HOMEPAGE="http://search.cpan.org/~njh/MusicBrainz-DiscID-0.03/"
+DOWNLOAD="http://search.cpan.org/CPAN/authors/id/N/NJ/NJH/MusicBrainz-DiscID-0.03.tar.gz"
+MD5SUM="4b775f38604f15fd20298d5b443d6900"
+DOWNLOAD_x86_64=""
+MD5SUM_x86_64=""
+REQUIRES="perl-Test-Pod"
+MAINTAINER="Glenn Becker"
+EMAIL="burningc@sdf.org"
diff --git a/perl/perl-MusicBrainz-DiscID/slack-desc b/perl/perl-MusicBrainz-DiscID/slack-desc
new file mode 100644
index 0000000000000..e507fa4c1857a
--- /dev/null
+++ b/perl/perl-MusicBrainz-DiscID/slack-desc
@@ -0,0 +1,22 @@
+# 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 ':' except on otherwise blank lines.
+
+                       |-----handy-ruler------------------------------------------------------|
+perl-MusicBrainz-DiscID: perl-MusicBrainz-DiscID (MusicBrainz::DiscID)
+perl-MusicBrainz-DiscID:
+perl-MusicBrainz-DiscID: MusicBrainz::DiscID is a class to calculate a MusicBrainz DiscID
+perl-MusicBrainz-DiscID: from an audio CD in the drive. The coding style is slightly different
+perl-MusicBrainz-DiscID: to the C interface to libdiscid, because it makes use of perl's 
+perl-MusicBrainz-DiscID: Object Oriented functionality.
+perl-MusicBrainz-DiscID:
+perl-MusicBrainz-DiscID: http://search.cpan.org/~njh/MusicBrainz-DiscID-0.03/
+perl-MusicBrainz-DiscID:
+perl-MusicBrainz-DiscID:
+perl-MusicBrainz-DiscID:
+perl-MusicBrainz-DiscID:
+perl-MusicBrainz-DiscID:
+perl-MusicBrainz-DiscID: