From 9d480664ad04b3961b55cdfa71338cf1946f8715 Mon Sep 17 00:00:00 2001 From: "Jan F. Chadima" Date: Sat, 9 Nov 2019 12:13:29 +0700 Subject: perl/perl-TryCatch: Added (Try - Catch operators for Perl 5). Signed-off-by: Willy Sudiarto Raharjo --- perl/perl-TryCatch/README | 8 +++ perl/perl-TryCatch/perl-TryCatch.SlackBuild | 102 ++++++++++++++++++++++++++++ perl/perl-TryCatch/perl-TryCatch.info | 10 +++ perl/perl-TryCatch/slack-desc | 19 ++++++ 4 files changed, 139 insertions(+) create mode 100644 perl/perl-TryCatch/README create mode 100644 perl/perl-TryCatch/perl-TryCatch.SlackBuild create mode 100644 perl/perl-TryCatch/perl-TryCatch.info create mode 100644 perl/perl-TryCatch/slack-desc (limited to 'perl/perl-TryCatch') diff --git a/perl/perl-TryCatch/README b/perl/perl-TryCatch/README new file mode 100644 index 0000000000000..8f4c4817bd8f3 --- /dev/null +++ b/perl/perl-TryCatch/README @@ -0,0 +1,8 @@ +Trycatch is an extension of the Perl 5 object system. + +This module aims to provide a nicer syntax and method to catch errors in Perl, +similar to what is found in other languages (such as Java, Python or C++). +The standard method of using eval {}; if ($@) {} is often prone to subtle bugs, +primarily that its far too easy to stomp on the error in error handlers. +And also eval/if isn't the nicest idiom. + diff --git a/perl/perl-TryCatch/perl-TryCatch.SlackBuild b/perl/perl-TryCatch/perl-TryCatch.SlackBuild new file mode 100644 index 0000000000000..09856f2d12edb --- /dev/null +++ b/perl/perl-TryCatch/perl-TryCatch.SlackBuild @@ -0,0 +1,102 @@ +#!/bin/sh + +# Slackware build script for perl-TryCatch + +# Copyright 2019 Jan F. Chadima +# 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-TryCatch +VERSION=${VERSION:-1.003002} +BUILD=${BUILD:-1} +TAG=${TAG:-_SBo} + +SRCNAM="$(printf $PRGNAM | cut -d- -f2-)" + +if [ -z "$ARCH" ]; then + case "$( uname -m )" in + i?86) ARCH=i586 ;; + arm*) ARCH=arm ;; + *) ARCH=$( uname -m ) ;; + esac +fi + +CWD=$(pwd) +TMP=${TMP:-/tmp/SBo} +PKG=$TMP/package-$PRGNAM +OUTPUT=${OUTPUT:-/tmp} + +if [ "$ARCH" = "i586" ]; then + SLKCFLAGS="-O2 -march=i586 -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 -L . \ + \( -perm 777 -o -perm 775 -o -perm 750 -o -perm 711 -o -perm 555 \ + -o -perm 511 \) -exec chmod 755 {} \; -o \ + \( -perm 666 -o -perm 664 -o -perm 640 -o -perm 600 -o -perm 444 \ + -o -perm 440 -o -perm 400 \) -exec chmod 644 {} \; + +perl Makefile.PL \ + PREFIX=/usr \ + INSTALLDIRS=vendor \ + INSTALLVENDORMAN3DIR=/usr/man/man3 +make +make test +make install DESTDIR=$PKG + +find $PKG -print0 | xargs -0 file | grep -e "executable" -e "shared object" | grep ELF \ + | cut -f 1 -d : | xargs strip --strip-unneeded 2> /dev/null || true + +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-TryCatch/perl-TryCatch.info b/perl/perl-TryCatch/perl-TryCatch.info new file mode 100644 index 0000000000000..deed6f5df7b1a --- /dev/null +++ b/perl/perl-TryCatch/perl-TryCatch.info @@ -0,0 +1,10 @@ +PRGNAM="perl-TryCatch" +VERSION="1.003002" +HOMEPAGE="https://metacpan.org/pod/TryCatch" +DOWNLOAD="https://cpan.metacpan.org/authors/id/A/AS/ASH/TryCatch-1.003002.tar.gz" +MD5SUM="37dbff1d9ab3b09d2a41b706f7716957" +DOWNLOAD_x86_64="" +MD5SUM_x86_64="" +REQUIRES="perl-B-Hooks-EndOfScope perl-B-Hooks-OP-Check perl-B-Hooks-OP-PPAddr perl-Devel-Declare perl-Moose perl-MooseX-Types perl-namespace-clean perl-Parse-Method-Signatures perl-Scope-Upper perl-Sub-Exporter perl-Variable-Magic" +MAINTAINER="Jan F. Chadima" +EMAIL="jfch@jagda.eu" diff --git a/perl/perl-TryCatch/slack-desc b/perl/perl-TryCatch/slack-desc new file mode 100644 index 0000000000000..147727b8d6d17 --- /dev/null +++ b/perl/perl-TryCatch/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 ':' except on otherwise blank lines. + + |-----handy-ruler------------------------------------------------------| +perl-TryCatch: perl-TryCatch (Try - Catch operators for Perl 5) +perl-TryCatch: +perl-TryCatch: This module aims to provide a nicer syntax and method to catch errors +perl-TryCatch: in Perl, similar to what is found in other languages (such as Java +perl-TryCatch: Python or C++). +perl-TryCatch: +perl-TryCatch: Homepage: https://metacpan.org/pod/TryCatch +perl-TryCatch: +perl-TryCatch: +perl-TryCatch: +perl-TryCatch: -- cgit v1.2.3