5 files changed, 157 insertions, 0 deletions
diff --git a/perl/perl-tk/README b/perl/perl-tk/README
new file mode 100644
index 0000000000..d78338991f
--- /dev/null
+++ b/perl/perl-tk/README
@@ -0,0 +1,8 @@
+perl-tk (Tk graphical interface for Perl)
+
+Perl/Tk is an extension for writing Perl programs with a GUI.
+
+Tk was originally developed as an extension to the Tcl language
+for use with the X Window System on Unix.  With its port to perl,
+Tk gives Perl programmers the same control over the graphical
+desktop that Tcl programmers have taken for granted.
diff --git a/perl/perl-tk/perl-tk-804.029.diff b/perl/perl-tk/perl-tk-804.029.diff
new file mode 100644
index 0000000000..0aab9659ed
--- /dev/null
+++ b/perl/perl-tk/perl-tk-804.029.diff
@@ -0,0 +1,27 @@
+diff -ru Tk-804.029.org//TextList/reindex.pl Tk-804.029/TextList/reindex.pl
+--- Tk-804.029.org//TextList/reindex.pl	2007-02-10 05:54:45.000000000 -0300
++++ Tk-804.029/TextList/reindex.pl	2010-08-05 13:53:36.447371174 -0300
+@@ -1,4 +1,4 @@
+-#!/bin/perl
++#!/usr/bin/perl
+ 
+ use lib qw(/home1/gbartels/textlist);
+ use Tk;
+diff -ru Tk-804.029.org//pTk/Tcl-pTk Tk-804.029/pTk/Tcl-pTk
+--- Tk-804.029.org//pTk/Tcl-pTk	2007-02-10 05:55:23.000000000 -0300
++++ Tk-804.029/pTk/Tcl-pTk	2010-08-05 13:54:06.527369253 -0300
+@@ -1,4 +1,4 @@
+-#!/usr/local/bin/perl -w
++#!/usr/bin/perl -w
+ use open IO => ':bytes'; # Avoid UTF-8 issues with some perl5.8.0 (RedHat)
+ use Carp;
+ my $verbose = 0;
+diff -ru Tk-804.029.org//pTk/mkVFunc Tk-804.029/pTk/mkVFunc
+--- Tk-804.029.org//pTk/mkVFunc	2008-11-04 20:06:50.000000000 -0200
++++ Tk-804.029/pTk/mkVFunc	2010-08-05 13:54:20.074244152 -0300
+@@ -1,4 +1,4 @@
+-#!/usr/local/bin/perl -w
++#!/usr/bin/perl -w
+ use strict;
+ 
+ 
diff --git a/perl/perl-tk/perl-tk.SlackBuild b/perl/perl-tk/perl-tk.SlackBuild
new file mode 100644
index 0000000000..11b9d93e12
--- /dev/null
+++ b/perl/perl-tk/perl-tk.SlackBuild
@@ -0,0 +1,93 @@
+#!/bin/sh
+
+# Slackware build script for perl-tk (Tk)
+
+# Written by Pablo Santamaria (pablosantamaria@gmail.com)
+
+PRGNAM=perl-tk
+VERSION=${VERSION:-804.029}
+BUILD=${BUILD:-1}
+TAG=${TAG:-_SBo}
+
+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 Tk-$VERSION
+tar xvf $CWD/Tk-$VERSION.tar.gz
+cd Tk-$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 {} \;
+
+# Apply a few patches
+patch -p1 < $CWD/$PRGNAM-$VERSION.diff
+
+# XFT=1 (font manager) support, which gives perl-tk programs the ability to
+# use all fonts accessible from XFT and antialiasing.
+perl Makefile.PL \
+     XFT=1 \
+     INSTALLDIRS=vendor \
+     INSTALLVENDORMAN1DIR=/usr/man/man1 \
+     INSTALLVENDORMAN3DIR=/usr/man/man3 \
+make OPTIMIZE="$SLKCFLAGS"
+make install  DESTDIR=$PKG
+
+find $PKG | xargs file | grep -e "executable" -e "shared object" | grep ELF \
+  | cut -f 1 -d : | xargs strip --strip-unneeded 2> /dev/null || true
+
+( 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
+)
+
+( cd $PKG
+    find . -name perllocal.pod \
+        -o -name ".packlist" \
+        -o -name "*.bs" \
+        | xargs rm -f
+)
+
+find $PKG -depth -type d -empty -delete || true
+
+mkdir -p $PKG/usr/doc/$PRGNAM-$VERSION
+cp -a COPYING Change.log Changes Funcs.doc INSTALL PPM-HowTo README \
+    README.linux ToDo VERSIONS $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-tk/perl-tk.info b/perl/perl-tk/perl-tk.info
new file mode 100644
index 0000000000..d0955ac0b3
--- /dev/null
+++ b/perl/perl-tk/perl-tk.info
@@ -0,0 +1,10 @@
+PRGNAM="perl-tk"
+VERSION="804.029"
+HOMEPAGE="http://search.cpan.org/~srezic/Tk-804.029/"
+DOWNLOAD="http://search.cpan.org/CPAN/authors/id/S/SR/SREZIC/Tk-804.029.tar.gz"
+MD5SUM="f4aebe6fcdb309a8480514f2ccf8117c"
+DOWNLOAD_x86_64=""
+MD5SUM_x86_64=""
+MAINTAINER="Pablo Santamaria"
+EMAIL="pablosantamaria@gmail.com"
+APPROVED="Erik Hanson"
diff --git a/perl/perl-tk/slack-desc b/perl/perl-tk/slack-desc
new file mode 100644
index 0000000000..907091f1b8
--- /dev/null
+++ b/perl/perl-tk/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-tk: perl-tk (Tk graphical interface for Perl)
+perl-tk:
+perl-tk: Perl/Tk is an extension for writing Perl programs with a GUI.
+perl-tk:
+perl-tk: Tk was originally developed as an extension to the Tcl language
+perl-tk: for use with the X Window System on Unix.  With its port to perl,
+perl-tk: Tk gives Perl programmers the same control over the graphical
+perl-tk: desktop that Tcl programmers have taken for granted.
+perl-tk:
+perl-tk:
+perl-tk: