From 23b029b076ccfab5df0aeb203739ae80e4cc36a8 Mon Sep 17 00:00:00 2001 From: eadler Date: Wed, 30 Oct 2013 21:28:24 +0000 Subject: Remove p5-deps.pl which was used when perl 5.8 was removed. It has not been needed in many years. Reported by: ak --- Tools/scripts/README | 1 - Tools/scripts/p5-deps.pl | 106 ----------------------------------------------- 2 files changed, 107 deletions(-) delete mode 100755 Tools/scripts/p5-deps.pl (limited to 'Tools/scripts') diff --git a/Tools/scripts/README b/Tools/scripts/README index 7c2e9232d16d..b053577c6ed5 100644 --- a/Tools/scripts/README +++ b/Tools/scripts/README @@ -32,7 +32,6 @@ gnomedepends - Analyse pkg/PLIST and give an advice as to which GNOME ports should be listes in {RUN,LIB}_DEPENDS for this port mark_safe.pl - utility to set subsets of ports to MAKE_JOBS_(UN)SAFE=yes neededlibs.sh - Extract direct library dependencies from binaries. -p5-deps.pl - Check unneeded p5-* dependencies which is in perl5.8 port. plist - automate (mostly, at least) pkg-plist generation portsearch - A utility for searching the ports tree. It allows more detailed search criteria than ``make search key='' and accepts diff --git a/Tools/scripts/p5-deps.pl b/Tools/scripts/p5-deps.pl deleted file mode 100755 index 6b0833f25cae..000000000000 --- a/Tools/scripts/p5-deps.pl +++ /dev/null @@ -1,106 +0,0 @@ -#!/usr/bin/perl -# -# $FreeBSD$ -# -# Usage: p5-deps.pl -# -# List up unneeded dependencies which is in perl 5.8.9 dist. -# -# This script will be used when perl5.8 port removed. - -use strict; -use warnings; -use File::Slurp; - -my (%OLD, %VER); -init(); - -open(my $fh, "<", "/usr/ports/INDEX-8") or die; -while (<$fh>) { - chomp; - my ($port, $dir, $prefix, $comment, $descr, $maint, $cat, $bdep, $rdep) = split(/\|/); -# next if ($maint !~ m/^(kuriyama|perl|port)\@freebsd\.org$/i); -# next if ($dir !~ m#^/usr/ports/devel/#); - my $go = 0; - foreach my $old (values %OLD) { - if ($bdep =~ m|\b$old-\d| or $rdep =~ m|\b$old-\d|) { - $go = 1; - last; - } - } - if ($go) { - foreach my $m (keys %OLD) { - my $make = read_file("$dir/Makefile"); - if ($make =~ m#([0-9.]+)?:\${PORTSDIR}/$m($| )#s) { - if ($1) { - # Compare versions in Makefile vs in core. - chomp(my $cmp = `pkg_version -t $1 $VER{$m}`); - if ($cmp eq '>') { # newer version required, OK. - last; - } - } - if (($m eq 'converters/p5-Encode' and $port eq 'p5-Padre-0.50_1') or - ($m eq 'devel/p5-Test-Harness' and $port eq 'p5-Games-Bingo-Print-0.04_1')) { - # Known to skip. - } else { - printf "$dir $port $m\n"; - last; - } - } - } - } -} - -sub init { - while () { - chomp; - my ($dir, $ver) = split(/\s+/, $_); - chdir "/usr/ports/$dir" or die "chdir($dir): $!"; - chomp(my $tri = `make -VPKGNAMEPREFIX -VPORTNAME -VPKGNAMESUFFIX`); - my $name = join("", split(/\n/, $tri)); - $OLD{$dir} = $name; - $VER{$dir} = $ver; - } -} - -# TAP::Harness is p5-Test-Harness>=3.00 - -__DATA__; -converters/p5-Encode 2.26 -converters/p5-MIME-Base64 3.07 -devel/p5-Data-Dumper 2.121 -devel/p5-ExtUtils-Command 1.16 -devel/p5-ExtUtils-Constant 0.21 -devel/p5-ExtUtils-Install 1.52 -devel/p5-ExtUtils-MakeMaker 6.48 -devel/p5-ExtUtils-Manifest 1.56 -devel/p5-ExtUtils-ParseXS 2.19 -devel/p5-File-Path 2.07 -devel/p5-File-Temp 0.20 -devel/p5-Getopt-Long 2.37 -devel/p5-IO 1.23 -devel/p5-Locale-Maketext 1.13 -devel/p5-Memoize 1.01 -devel/p5-Module-CoreList 2.17 -devel/p5-Module-Pluggable 3.9 -devel/p5-NEXT 0.64 -devel/p5-PathTools 3.31 -devel/p5-Storable 2.19 -devel/p5-Term-ANSIColor 1.12 -devel/p5-Test-Harness 2.64 -devel/p5-Test-Simple 0.80 -devel/p5-Time-HiRes 1.9715 -devel/p5-Time-Local 1.1901 -devel/p5-XSLoader 0.10 -lang/p5-Scalar-List-Utils 1.19 -math/p5-Math-BigInt 1.89 -math/p5-Math-BigRat 0.22 -math/p5-Math-Complex 1.54 -net/p5-Net 1.11 -security/p5-Digest 1.15 -security/p5-Digest-MD5 2.37 -textproc/p5-Filter-Simple 0.83 -textproc/p5-Pod-Parser 1.35 -textproc/p5-Text-Balanced 1.98 -textproc/p5-Text-ParseWords 3.27 -www/p5-CGI.pm 3.42 -- cgit