ports/124956: Net port: devel/p5-Chooser A system for choosing a value for something. Takes a string composed of various tests, arguements, and etc and returns a value based on it.

[Zane C.B.]

>Number:         124956
>Category:       ports
>Synopsis:       Net port: devel/p5-Chooser    A system for choosing a value for something. Takes a string composed of various tests, arguements, and etc and returns a value based on it.
>Confidential:   no
>Severity:       non-critical
>Priority:       low
>Responsible:    freebsd-ports-bugs
>State:          open
>Quarter:        
>Keywords:       
>Date-Required:
>Class:          change-request
>Submitter-Id:   current-users
>Arrival-Date:   Tue Jun 24 19:20:01 UTC 2008
>Closed-Date:
>Last-Modified:
>Originator:     Zane C.B.
>Release:        FreeBSD 6.3-STABLE i386
>Organization:
>Environment:


System: FreeBSD 6.3-STABLE #3: Mon May 26 17:37:16 CDT 2008
    root at vixen42.vulpes:/usr/obj/usr/src/sys/SMP



>Description:


    use Chooser;

        #The irst tests if /test/ matches the hostname. If it does
        # a value of test is set with a wieght of 42. This makes 
        #it heavier so even if another is matched, this will be returned.
        #
        #The second test checks to make sure that no interfaces have a
        #CIDR of 192.168.0.0/16. If it does a value of not192168 is returned. 
        #
        #The third tests if
        my $string="hostregex|1|test|42|regex=test\n".
                                "cidr|0|not192168|1|cidr=192.168.0.0/16".
                                "defgateway|0|19216801|1|ip=192.168.0.1"

    my ($success, $choosen) = choose($string);
    if(!$success){
        print "The choosen value is '".$choosen."'\n";
    }else{
        print "Chooser hit a error processing...\n".$string."\n";
    };
    ...



>How-To-Repeat:


1: Unshar
2:
3: Enjoy.


>Fix:


--- devel_p5-Chooser.shar begins here ---
# This is a shell archive.  Save it in a file, remove anything before
# this line, and then unpack it by entering "sh file".  Note, it may
# create directories; files and directories will be owned by you and
# have default permissions.
#
# This archive contains:
#
#	devel/p5-Chooser/
#	devel/p5-Chooser/Makefile
#	devel/p5-Chooser/distinfo
#	devel/p5-Chooser/pkg-descr
#	devel/p5-Chooser/pkg-plist
#
echo c - devel/p5-Chooser/
mkdir -p devel/p5-Chooser/ > /dev/null 2>&1
echo x - devel/p5-Chooser/Makefile
sed 's/^X//' >devel/p5-Chooser/Makefile << 'END-of-devel/p5-Chooser/Makefile'
X# New ports collection makefile for:	p5-Net-LDAP-Chooser
X# Date created:		2008-06-24
X# Whom:			Zane C, Bowers <vvelox at vvelox.net>
X#
X# $FreeBSD$
X#
X
XPORTNAME=	Chooser
XPORTVERSION=	1.1.6
XCATEGORIES=	net perl5
XMASTER_SITES=	CPAN
XMASTER_SITE_SUBDIR=	../../authors/id/V/VV/VVELOX
XPKGNAMEPREFIX=	p5-
X
XMAINTAINER=	vvelox at vvelox.net
XCOMMENT=	A system for choosing a value for something. Takes a string composed of various tests, arguements, and etc and returns a value based on it
X
XRUN_DEPENDS=	${SITE_PERL}/Net/CIDR/Lite.pm:${PORTSDIR}/net/p5-Net-CIDR-Lite
X
XPERL_CONFIGURE=	yes
X
XMAN3=		Chooser.3
X
X.include <bsd.port.mk>
END-of-devel/p5-Chooser/Makefile
echo x - devel/p5-Chooser/distinfo
sed 's/^X//' >devel/p5-Chooser/distinfo << 'END-of-devel/p5-Chooser/distinfo'
XMD5 (Chooser-1.1.6.tar.gz) = 7d5e695019768d0d7299eb3fa67c51eb
XSHA256 (Chooser-1.1.6.tar.gz) = 81240169bc54a14cced1b5fad77bbfccbfca7f0a7cf6e6421adb7aa92d16976c
XSIZE (Chooser-1.1.6.tar.gz) = 6114
END-of-devel/p5-Chooser/distinfo
echo x - devel/p5-Chooser/pkg-descr
sed 's/^X//' >devel/p5-Chooser/pkg-descr << 'END-of-devel/p5-Chooser/pkg-descr'
XA system for choosing a value for something. Takes a string composed of various
Xtests, arguements, and etc and returns a value based on it.
X
XWWW: http://search.cpan.org/dist/Chooser/
END-of-devel/p5-Chooser/pkg-descr
echo x - devel/p5-Chooser/pkg-plist
sed 's/^X//' >devel/p5-Chooser/pkg-plist << 'END-of-devel/p5-Chooser/pkg-plist'
X%%SITE_PERL%%/Chooser.pm
X%%SITE_PERL%%/%%PERL_ARCH%%/auto/Chooser/.packlist
X at dirrmtry %%SITE_PERL%%/%%PERL_ARCH%%/auto/Chooser
X at dirrmtry %%SITE_PERL%%/Chooser
END-of-devel/p5-Chooser/pkg-plist
exit

--- devel_p5-Chooser.shar ends here ---



>Release-Note:
>Audit-Trail:
>Unformatted: