diff --git a/perl/perl-B-Lint/B-Lint-1.20-Skip-a-bare-sub-test.patch b/perl/perl-B-Lint/B-Lint-1.20-Skip-a-bare-sub-test.patch new file mode 100644 index 0000000000..fdb0a62dfc --- /dev/null +++ b/perl/perl-B-Lint/B-Lint-1.20-Skip-a-bare-sub-test.patch @@ -0,0 +1,49 @@ +# Source: https://rt.cpan.org/Public/Ticket/Attachment/1507017/803268/B-Lint-1.20-Skip-a-bare-sub-test.patch +diff --git a/lib/B/Lint.pm b/lib/B/Lint.pm +index 1f5098f..7291b18 100644 +--- a/lib/B/Lint.pm ++++ b/lib/B/Lint.pm +@@ -85,6 +85,10 @@ trap are: + + Neither of these will do what a naive user would expect. + ++Notice: Perl 5.22.0 does not report C in C<$b{foo}> as BARE token ++anymore. Therefore L test is not reliable here. See ++L. ++ + =item B + + This option warns whenever C<$_> is used either explicitly anywhere or +diff --git a/t/lint.t b/t/lint.t +index 7317b1d..93255d9 100644 +--- a/t/lint.t ++++ b/t/lint.t +@@ -14,7 +14,7 @@ BEGIN { + use strict; + use warnings; + +-plan tests => 29; ++plan tests => 30; + + # Runs a separate perl interpreter with the appropriate lint options + # turned on +@@ -116,10 +116,17 @@ RESULT + + runlint 'bare-subs', 'sub bare(){1};$x=bare', ''; + +-runlint 'bare-subs', 'sub bare(){1}; $x=[bare=>0]; $x=$y{bare}', <<'RESULT'; ++runlint 'bare-subs', 'sub bare(){1}; $x=[bare=>0]', <<'RESULT'; + Bare sub name 'bare' interpreted as string at -e line 1 ++RESULT ++ ++SKIP: { ++ skip 'Perl 5.22 stopped marking $hash{bare} as BARE word, CPAN RT#101115', ++ 1, if $] >= 5.022; ++ runlint 'bare-subs', 'sub bare(){1}; $x=$y{bare}', <<'RESULT'; + Bare sub name 'bare' interpreted as string at -e line 1 + RESULT ++} + + { + +-- diff --git a/perl/perl-B-Lint/README b/perl/perl-B-Lint/README new file mode 100644 index 0000000000..bf559fb6d2 --- /dev/null +++ b/perl/perl-B-Lint/README @@ -0,0 +1,3 @@ +The B::Lint module is equivalent to an extended version of the -w +option of perl. It is named after the program 'lint' which carries +out a similar process for C Programs. diff --git a/perl/perl-B-Lint/perl-B-Lint.SlackBuild b/perl/perl-B-Lint/perl-B-Lint.SlackBuild new file mode 100644 index 0000000000..7cfce209db --- /dev/null +++ b/perl/perl-B-Lint/perl-B-Lint.SlackBuild @@ -0,0 +1,96 @@ +#!/bin/bash + +# Slackware build script for perl-B-Lint + +# Copyright 2024 Charadon US +# 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. + +cd $(dirname $0) ; CWD=$(pwd) + +PRGNAM=perl-B-Lint +VERSION=${VERSION:-1.20} +BUILD=${BUILD:-1} +TAG=${TAG:-_SBo} +PKGTYPE=${PKGTYPE:-tgz} + +SRCNAM="$(printf $PRGNAM | cut -d- -f2-)" + +ARCH=noarch + +if [ ! -z "${PRINT_PACKAGE_NAME}" ]; then + echo "$PRGNAM-$VERSION-$ARCH-$BUILD$TAG.$PKGTYPE" + exit 0 +fi + +TMP=${TMP:-/tmp/SBo} +PKG=$TMP/package-$PRGNAM +OUTPUT=${OUTPUT:-/tmp} + +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 {} \; + +# Apply patch to skip test +# https://rt.cpan.org/Public/Bug/Display.html?id=101115 +patch -p1 < "$CWD/B-Lint-1.20-Skip-a-bare-sub-test.patch" + +# Build method #1 (preferred) +perl Makefile.PL \ + PREFIX=/usr \ + INSTALLDIRS=vendor \ + INSTALLVENDORMAN1DIR=/usr/man/man1 \ + 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 + +# Remove perllocal.pod and other special files that don't need to be installed, +# as they will overwrite what's already on the system. +find $PKG -name perllocal.pod -o -name ".packlist" -o -name "*.bs" | xargs rm -f || true + +# Remove empty directories +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 diff --git a/perl/perl-B-Lint/perl-B-Lint.info b/perl/perl-B-Lint/perl-B-Lint.info new file mode 100644 index 0000000000..2db2958f00 --- /dev/null +++ b/perl/perl-B-Lint/perl-B-Lint.info @@ -0,0 +1,10 @@ +PRGNAM="perl-B-Lint" +VERSION="1.20" +HOMEPAGE="https://metacpan.org/pod/B::Lint" +DOWNLOAD="https://cpan.metacpan.org/authors/id/R/RJ/RJBS/B-Lint-1.20.tar.gz" +MD5SUM="fa50cb6d61b46f7ac4bdbebda455d6a0" +DOWNLOAD_x86_64="" +MD5SUM_x86_64="" +REQUIRES="perl-Module-Pluggable" +MAINTAINER="Charadon" +EMAIL="dev@iotib.net" diff --git a/perl/perl-B-Lint/slack-desc b/perl/perl-B-Lint/slack-desc new file mode 100644 index 0000000000..8839b20980 --- /dev/null +++ b/perl/perl-B-Lint/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-B-Lint: perl-B-Lint (Perl lint) +perl-B-Lint: +perl-B-Lint: The B::Lint module is equivalent to an extended version of the -w +perl-B-Lint: option of perl. It is named after the program 'lint' which carries +perl-B-Lint: out a similar process for C Programs. +perl-B-Lint: +perl-B-Lint: +perl-B-Lint: +perl-B-Lint: +perl-B-Lint: +perl-B-Lint: