New port:

Perl with Japanese language support, AKA jperl.
Submitted by:	sanpei@yy.cs.keio.ac.jp
(Closing PR #2456.)

9 files changed, 1826 insertions, 0 deletions

diff --git a/japanese/perl5/Makefile b/japanese/perl5/Makefile
new file mode 100644
index 000000000000..65bececc5cec
--- /dev/null
+++ b/japanese/perl5/Makefile
@@ -0,0 +1,77 @@
+# New ports collection makefile for:	jp-perl5
+# Version required:	5.003
+# Date created:		7 January 1997
+# Whom:			Yoshiro MIHIRA
+#
+# $Id$
+#
+
+DISTNAME=	perl5.003
+PKGNAME=	jp-perl-5.003
+CATEGORIES=	japanese
+MASTER_SITES=	ftp://ftp.funet.fi/pub/languages/perl/CPAN/src/5.0/ \
+		ftp://ftp.is.co.za/pub/perl/CPAN/src/5.0/ \
+		ftp://dong.math.ncu.edu.tw/perl/CPAN/src/5.0/ \
+		ftp://ftp.lab.kdd.co.jp/lang/perl/CPAN/src/5.0/ \
+		ftp://ftp.pasteur.fr/pub/computing/unix/perl/CPAN/src/5.0/ \
+		ftp://ftp.sunet.se/pub/lang/perl/CPAN/src/5.0/ \
+		ftp://ftp.switch.ch/mirror/CPAN/src/5.0/ \
+		ftp://unix.hensa.ac.uk/mirrors/perl-CPAN/src/5.0/ \
+		ftp://ftp.cis.ufl.edu/pub/perl/CPAN/src/5.0/ \
+		ftp://ftp.delphi.com/pub/mirrors/packages/perl/CPAN/src/5.0/ \
+		ftp://uiarchive.cso.uiuc.edu/pub/lang/perl/CPAN/src/5.0/
+
+PATCHFILES=	jperl5.003.patch7_1.gz
+PATCH_SITES=	ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/WATANABE/ \
+		ftp://ftp.is.co.za/pub/perl/CPAN/authors/id/WATANABE/ \
+		ftp://dong.math.ncu.edu.tw/perl/CPAN/authors/id/WATANABE/ \
+		ftp://ftp.lab.kdd.co.jp/lang/perl/CPAN/authors/id/WATANABE/ \
+		ftp://ftp.pasteur.fr/pub/computing/unix/perl/CPAN/authors/id/WATANABE/ \
+		ftp://ftp.sunet.se/pub/lang/perl/CPAN/authors/id/WATANABE/ \
+		ftp://ftp.switch.ch/mirror/CPAN/authors/id/WATANABE/ \
+		ftp://unix.hensa.ac.uk/mirrors/perl-CPAN/authors/id/WATANABE/ \
+		ftp://ftp.cis.ufl.edu/pub/perl/CPAN/authors/id/WATANABE/ \
+		ftp://ftp.delphi.com/pub/mirrors/packages/perl/CPAN/authors/id/WATANABE/ \
+		ftp://uiarchive.cso.uiuc.edu/pub/lang/perl/CPAN/authors/id/WATANABE/
+
+MAINTAINER=	sanpei@yy.cs.keio.ac.jp
+
+PATCH_DIST_STRIP=       -p1
+HAS_CONFIGURE=		yes
+CONFIGURE_SCRIPT=	Configure
+CONFIGURE_ARGS=		-sde -Dprefix=${PREFIX}
+
+MAN1= 	perlbook.1 perlbot.1 perlcall.1 perldata.1 perldebug.1 perldiag.1  \
+	perlembed.1 perlform.1 perlfunc.1 perlguts.1 perlipc.1 perllol.1   \
+	perlmod.1 perlobj.1 perlop.1 perlovl.1 perlpod.1 perlre.1 perlref.1 \
+	perlrun.1 perlsec.1 perlstyle.1 perlsub.1 perlsyn.1 perltie.1  \
+	perltoc.1 perltrap.1 perlvar.1 perlxs.1 perlxstut.1 perl.1 \
+	a2p.1 s2p.1 jperl.1
+MAN3=	AnyDBM_File.3 AutoLoader.3 AutoSplit.3 Benchmark.3 \
+	Carp.3 Cwd.3 DirHandle.3 ExtUtils::Manifest.3 Devel::SelfStubber.3 \
+	English.3 Env.3 Exporter.3 Term::Cap.3 Shell.3 ExtUtils::Install.3 \
+	ExtUtils::Liblist.3 ExtUtils::MM_OS2.3 ExtUtils::MM_Unix.3 \
+	ExtUtils::MM_VMS.3 ExtUtils::MakeMaker.3 FileCache.3 \
+	ExtUtils::Mkbootstrap.3 ExtUtils::Mksymlists.3 ExtUtils::testlib.3\
+	ExtUtils::Miniperl.3 File::Basename.3 File::CheckTree.3 \
+	File::Copy.3 File::Find.3 File::Path.3 Getopt::Long.3 \
+	Getopt::Std.3 I18N::Collate.3 IPC::Open2.3 IPC::Open3.3 \
+	Math::BigFloat.3 Math::BigInt.3 Math::Complex.3 Net::Ping.3 \
+	Pod::Text.3 Search::Dict.3 SelectSaver.3 SelfLoader.3 Symbol.3 \
+	Text::ParseWords.3 Sys::Hostname.3 Sys::Syslog.3 Term::Complete.3 \
+	Term::ReadLine.3 Test::Harness.3 Text::Abbrev.3 subs.3 \
+	Text::Soundex.3 Text::Tabs.3 Text::Wrap.3 Tie::Hash.3 \
+	Tie::Scalar.3 Tie::SubstrHash.3 Time::Local.3 diagnostics.3 \
+	integer.3 less.3 lib.3 overload.3 sigtrap.3 strict.3 vars.3 \
+	Config.3 DynaLoader.3 DB_File.3 Fcntl.3 FileHandle.3 \
+	NDBM_File.3 POSIX.3 SDBM_File.3 Safe.3 Socket.3 I18N::Japanese.3
+MAN3PREFIX=	${PREFIX}/lib/perl5
+
+test:
+	@(cd ${WRKSRC}; make test)
+
+post-install:
+	@strip ${PREFIX}/bin/perl ${PREFIX}/bin/suidperl
+	@ln -s ${PREFIX}/bin/perl ${PREFIX}/bin/jperl
+
+.include <bsd.port.mk>
diff --git a/japanese/perl5/distinfo b/japanese/perl5/distinfo
new file mode 100644
index 000000000000..0fe1a9c990d3
--- /dev/null
+++ b/japanese/perl5/distinfo
@@ -0,0 +1,2 @@
+MD5 (perl5.003.tar.gz) = b1bb23995cd25e5b750585bfede0e8a5
+MD5 (jperl5.003.patch7_1.gz) = 1c4574d7e616d8147b8cc7ba9b2f840d
diff --git a/japanese/perl5/files/patch-aa b/japanese/perl5/files/patch-aa
new file mode 100644
index 000000000000..e17501b21092
--- /dev/null
+++ b/japanese/perl5/files/patch-aa
@@ -0,0 +1,29 @@
+--- Configure.orig	Sat Jan 11 15:16:14 1997
++++ Configure	Sat Jan 11 15:22:42 1997
+@@ -85,11 +85,12 @@
+ PATH=.$p_$PATH
+ export PATH
+ 
+-: Sanity checks
+-if test ! -t 0; then
+-	echo "Say 'sh $me', not 'sh <$me'"
+-	exit 1
+-fi
++#: Sanity checks (Disabled for FreeBSD build - users coming here [ws]ould
++#                 know what they are doing anyway) ;-) MarkM
++#if test ! -t 0; then
++#	echo "Say 'sh $me', not 'sh <$me'"
++#	exit 1
++#fi
+ 
+ : On HP-UX, large Configure scripts may exercise a bug in /bin/sh
+ if test -f /hp-ux -a -f /bin/ksh; then
+@@ -709,7 +710,7 @@
+ : List of libraries we want.
+ libswanted='net socket inet nsl nm ndbm gdbm dbm db malloc dl'
+ libswanted="$libswanted dld ld sun m c cposix posix ndir dir crypt"
+-libswanted="$libswanted ucb bsd BSD PW x"
++libswanted="$libswanted ucb bsd BSD PW x xpg4"
+ : We probably want to search /usr/shlib before most other libraries.
+ : This is only used by the lib/ExtUtils/MakeMaker.pm routine extliblist.
+ glibpth=`echo " $glibpth " | sed -e 's! /usr/shlib ! !'`
diff --git a/japanese/perl5/files/patch-ac b/japanese/perl5/files/patch-ac
new file mode 100644
index 000000000000..451a47418899
--- /dev/null
+++ b/japanese/perl5/files/patch-ac
@@ -0,0 +1,1077 @@
+--- ./pod/perltrap.pod.orig	Tue Jan 30 20:23:50 1996
++++ ./pod/perltrap.pod	Sun Jul 14 17:33:46 1996
+@@ -172,7 +172,7 @@
+ 
+ =item *
+ 
+-printf() does not implement the "*" format for interpolating
++C<printf()> does not implement the "*" format for interpolating
+ field widths, but it's trivial to use interpolation of double-quoted
+ strings to achieve the same effect.
+ 
+@@ -318,7 +318,7 @@
+ 
+ =item *
+ 
+-Use my() for local variables whenever you can get away with 
++Use C<my()> for local variables whenever you can get away with 
+ it (but see L<perlform> for where you can't).  
+ Using local() actually gives a local value to a global 
+ variable, which leaves you open to unforeseen side-effects
+@@ -332,75 +332,540 @@
+ 
+ =back
+ 
+-=head2 Perl4 Traps
+ 
+-Penitent Perl 4 Programmers should take note of the following
+-incompatible changes that occurred between release 4 and release 5:
++=head2 Perl4 to Perl5  Traps
++
++Practicing Perl4 Programmers should take note of the following 
++Perl4-to-Perl5 specific traps.
++
++They're crudely ordered according to the following list:
+ 
+ =over 4
+ 
+-=item *
++=item Discontinuance, Depracation, and BugFix traps
+ 
+-C<@> now always interpolates an array in double-quotish strings.  Some programs
+-may now need to use backslash to protect any C<@> that shouldn't interpolate.
++=item Parsing Traps
+ 
+-=item *
++=item Numerical Traps
+ 
+-Barewords that used to look like strings to Perl will now look like subroutine
+-calls if a subroutine by that name is defined before the compiler sees them.
+-For example:
++=item General data type traps
+ 
+-    sub SeeYa { die "Hasta la vista, baby!" }
+-    $SIG{'QUIT'} = SeeYa;
++=item Context Traps - scalar, list contexts
+ 
+-In Perl 4, that set the signal handler; in Perl 5, it actually calls the
+-function!  You may use the B<-w> switch to find such places.
++=item Precedence Traps
+ 
+-=item *
++=item General Regular Expression Traps using s///, etc.
+ 
+-Symbols starting with C<_> are no longer forced into package C<main>, except
+-for $_ itself (and @_, etc.).
++=item Subroutine, Signal, Sorting Traps
+ 
+-=item *
++=item OS Traps
++
++=item Unclassified Traps
++
++=back
++
++If you find an example of a conversion trap that is not listed here,
++please submit it to Bill Middleton F<wjm@best.com> for inclusion.
++Also note that at least some of these can be caught with C<-w>.
++
++=head2 Discontinuance, Depracation, and BugFix traps
++
++Anything that has been discontinued, depracated, or fixed as
++a bug from perl4.  
++
++=over 4
++
++=item * Discontinuance 
++
++Symbols starting with "_" are no longer forced into package main, except
++for C<$_> itself (and C<@_>, etc.).
++
++    package test;
++    $_legacy = 1;
++
++    package main;
++    print "\$_legacy is ",$_legacy,"\n";
++ 
++    # perl4 prints: $_legacy is 1
++    # perl5 prints: $_legacy is
++
++=item * Depracation 
+ 
+ Double-colon is now a valid package separator in an identifier.  Thus these
+-behave differently in perl4 vs. perl5:
++behave differently in perl4 vs. perl5, since the packages dont exist.
+ 
+-    print "$a::$b::$c\n";
++    $a=1;$b=2;$c=3;$var=4;
++    print "$a::$b::$c ";
+     print "$var::abc::xyz\n";
++ 
++    # perl4 prints: 1::2::3 4::abc::xyz
++    # perl5 prints: 3
+ 
+-=item *
++Given that C<::> is now the preferred package delimiter, it is debatable
++whether this should be classed as a bug or not.
++(The older package delimiter, ' ,is used here)
+ 
+-C<s'$lhs'$rhs'> now does no interpolation on either side.  It used to
+-interpolate C<$lhs> but not C<$rhs>.
++    $x = 10 ;
++    print "x=${'x}\n" ;
++ 
++    # perl4 prints: x=10
++    # perl5 prints: Can't find string terminator "'" anywhere before EOF
+ 
+-=item *
++Also see precedence traps, for parsing C<$:>. 
+ 
+-The second and third arguments of splice() are now evaluated in scalar
+-context (as the book says) rather than list context.
++=item * BugFix
+ 
+-=item *
++The second and third arguments of C<splice()> are now evaluated in scalar
++context (as the Camel says) rather than list context.
++    
++    sub sub1{return(0,2) }          # return a 2-elem array
++    sub sub2{ return(1,2,3)}        # return a 3-elem array
++    @a1 = ("a","b","c","d","e"); 
++    @a2 = splice(@a1,&sub1,&sub2);
++    print join(' ',@a2),"\n";
++ 
++    # perl4 prints: a b
++    # perl5 prints: c d e 
+ 
+-These are now semantic errors because of precedence:
++=item * Discontinuance 
+ 
+-    shift @list + 20;	
+-    $n = keys %map + 20; 
++You can't do a C<goto> into a block that is optimized away.  Darn.
+ 
+-Because if that were to work, then this couldn't:
++    goto marker1;
+ 
+-    sleep $dormancy + 20;
++    for(1){         
++    marker1:
++        print "Here I is!\n";
++    } 
++ 
++    # perl4 prints: Here I is!
++    # perl5 dumps core (SEGV)
+ 
+-=item *
++=item * Discontinuance 
++
++It is no longer syntactically legal to use whitespace as the name
++of a variable, or as a delimiter for any kind of quote construct.
++Double darn. 
++
++    $a = ("foo bar");
++    $b = q baz ;
++    print "a is $a, b is $b\n";
++ 
++    # perl4 prints: a is foo bar, b is baz
++    # perl5 errors: Bare word found where operator expected
++    
++=item * Discontinuance
++
++The archaic while/if BLOCK BLOCK syntax is no longer supported.
++
++    if { 1 } {
++        print "True!";
++    }
++    else {
++        print "False!";
++    }
++ 
++    # perl4 prints: True!
++    # perl5 errors: syntax error at test.pl line 1, near "if {"
++
++=item * BugFix
++
++The C<**> operator now binds more tightly than unary minus.
++It was documented to work this way before, but didn't.
++
++    print -4**2,"\n";
++ 
++    # perl4 prints: 16
++    # perl5 prints: -16
++
++=item * Discontinuance 
++
++The meaning of C<foreach{}> has changed slightly when it is iterating over a
++list which is not an array.  This used to assign the list to a
++temporary array, but no longer does so (for efficiency).  This means
++that you'll now be iterating over the actual values, not over copies of
++the values.  Modifications to the loop variable can change the original
++values.
++
++    @list = ('ab','abc','bcd','def');
++    foreach $var (grep(/ab/,@list)){
++        $var = 1;
++    }
++    print (join(':',@list));
++ 
++    # perl4 prints: ab:abc:bcd:def
++    # perl5 prints: 1:1:bcd:def
++
++To retain Perl4 semantics you need to assign your list
++explicitly to a temporary array and then iterate over that.  For 
++example, you might need to change
++
++    foreach $var (grep(/ab/,@list)){
++
++to
++
++    foreach $var (@tmp = grep(/ab/,@list)){
++
++Otherwise changing $var will clobber the values of @list.  (This most often
++happens when you use C<$_> for the loop variable, and call subroutines in
++the loop that don't properly localize C<$_>.)
++
++=item * Depracation
++
++Some error messages will be different.
++
++=item * Discontinuance 
++
++Some bugs may have been inadvertently removed.  :-)
++
++=back
++
++=head2 Parsing Traps
++
++Perl4-to-Perl5 traps from having to do with parsing.
++
++=over 4
++
++=item * Parsing
++
++Note the space between . and =
++
++    $string . = "more string";
++    print $string;
++ 
++    # perl4 prints: more string
++    # perl5 prints: syntax error at - line 1, near ". ="
++
++=item * Parsing
++
++Better parsing in perl 5
++
++    sub foo {}
++    &foo
++    print("hello, world\n");
++ 
++    # perl4 prints: hello, world
++    # perl5 prints: syntax error
++
++=item * Parsing
++
++"if it looks like a function, it is a function" rule.
++
++  print
++    ($foo == 1) ? "is one\n" : "is zero\n";
++ 
++    # perl4 prints: is zero
++    # perl5 warns: "Useless use of a constant in void context" if using -w
++
++=back
++
++=head2 Numerical Traps
++
++Perl4-to-Perl5 traps having to do with numerical operators,
++operands, or output from same.
++
++=over 5
++
++=item * Numerical
++
++Formatted output and significant digits
++
++    print 7.373504 - 0, "\n";
++    printf "%20.18f\n", 7.373504 - 0; 
++ 
++    # Perl4 prints:
++    7.375039999999996141
++    7.37503999999999614
++ 
++    # Perl5 prints:
++    7.373504
++    7.37503999999999614
++
++=item * Numerical
++
++Large integer trap with autoincrement
++
++    $a = $b = 2147483647;
++    print "$a   $b\n";
++    $a += 1;
++    $b++;
++    print "$a   $b\n";
++ 
++    # perl4 prints:
++    2147483647   2147483647
++    2147483648   2147483648
++ 
++    # perl5 prints:
++    2147483647   2147483647
++    2147483648   -2147483648
++
++=item * Numerical  
++
++Assignment of return values from numeric equality tests
++does not work in perl5 when the test evaluates to false (0).
++Logical tests now return an null, instead of 0
++ 
++    $p = ($test == 1);
++    print $p,"\n";
++  
++    # perl4 prints: 0
++    # perl5 prints:
++
++Also see the L<General Regular Expression Traps> tests for another example 
++of this new feature...
++
++=back
++
++=head2 General data type traps
++
++Perl4-to-Perl5 traps involving most data-types, and their usage
++within certain expressions and/or context.
++
++=over 5
++
++=item * (Arrays)
++
++Negative array subscripts now count from the end of the array.
++
++    @a = (1, 2, 3, 4, 5);
++    print "The third element of the array is $a[3] also expressed as $a[-2] \n";
++  
++    # perl4 prints: The third element of the array is 4 also expressed as
++    # perl5 prints: The third element of the array is 4 also expressed as 4
++
++=item * (Arrays)
++
++Setting C<$#array> lower now discards array elements, and makes them
++impossible to recover.
++
++    @a = (a,b,c,d,e); 
++    print "Before: ",join('',@a);
++    $#a =1; 
++    print ", After: ",join('',@a);
++    $#a =3;
++    print ", Recovered: ",join('',@a),"\n";
++  
++    # perl4 prints: Before: abcde, After: ab, Recovered: abcd
++    # perl5 prints: Before: abcde, After: ab, Recovered: ab
++
++=item * (Hashes)
++
++Hashes get defined before use
++
++    local($s,@a,%h); 
++    die "scalar \$s defined" if defined($s);
++    die "array \@a defined" if defined(@a);
++    die "hash \%h defined" if defined(%h);
++ 
++    # perl4 prints:
++    # perl5 dies: hash %h defined
++
++=item * (Globs)
++
++glob assignment from variable to variable will fail if the assigned
++variable is localized subsequent to the assignment
++
++    @a = ("This is Perl 4");
++    *b = *a;
++    local(@a);
++    print @b,"\n";
++ 
++    # perl4 prints: This is Perl 4
++    # perl5 prints:
++ 
++    # Another example
++ 
++    *fred = *barney; # fred is aliased to barney
++    @barney = (1, 2, 4);
++    # @fred;
++    print "@fred";  # should print "1, 2, 4"
++ 
++    # perl4 prints: 1 2 4
++    # perl5 prints: Literal @fred now requires backslash 
++ 
++=item * (Scalar String)
++
++Changes in unary negation (of strings)
++This change effects both the return value and what it
++does to auto(magic)increment.
++
++    $x = "aaa";
++    print ++$x," : ";
++    print -$x," : ";
++    print ++$x,"\n";
++ 
++    # perl4 prints: aab : -0 : 1
++    # perl5 prints: aab : -aab : aac
++
++=item * (Constants)
++
++perl 4 lets you modify constants:
++
++    $foo = "x";
++    &mod($foo);
++    for ($x = 0; $x < 3; $x++) {
++        &mod("a");
++    }
++    sub mod {
++        print "before: $_[0]";
++        $_[0] = "m";
++        print "  after: $_[0]\n";
++    }
++ 
++    # perl4:
++    # before: x  after: m
++    # before: a  after: m
++    # before: m  after: m
++    # before: m  after: m
++ 
++    # Perl5:
++    # before: x  after: m
++    # Modification of a read-only value attempted at foo.pl line 12.
++    # before: a
++
++=item * (Scalars)
++
++The behavior is slightly different for:
++
++    print "$x", defined $x
++  
++    # perl 4: 1
++    # perl 5: <no output, $x is not called into existence>
++
++=item * (Variable Suicide)
++
++Variable suicide behavior is more consistent under Perl 5.
++Perl5 exhibits the same behavior for associative arrays and scalars,
++that perl4 exhibits only for scalars.
++
++    $aGlobal{ "aKey" } = "global value";
++    print "MAIN:", $aGlobal{"aKey"}, "\n";
++    $GlobalLevel = 0;
++    &test( *aGlobal );
++
++    sub test {
++        local( *theArgument ) = @_;
++        local( %aNewLocal ); # perl 4 != 5.001l,m
++        $aNewLocal{"aKey"} = "this should never appear";  
++        print "SUB: ", $theArgument{"aKey"}, "\n";
++        $aNewLocal{"aKey"} = "level $GlobalLevel";   # what should print
++        $GlobalLevel++;
++        if( $GlobalLevel<4 ) {
++            &test( *aNewLocal );
++        }
++    }
++ 
++    # Perl4:
++    # MAIN:global value
++    # SUB: global value
++    # SUB: level 0
++    # SUB: level 1
++    # SUB: level 2
++ 
++    # Perl5:
++    # MAIN:global value
++    # SUB: global value
++    # SUB: this should never appear
++    # SUB: this should never appear
++    # SUB: this should never appear
++
++=back 
++
++=head2 Context Traps - scalar, list contexts
++
++=over 5
++
++=item * (list context)
++
++The elements of argument lists for formats are now evaluated in list
++context.  This means you can interpolate list values now.
++
++    @fmt = ("foo","bar","baz");
++    format STDOUT=
++    @<<<<< @||||| @>>>>>
++    @fmt;
++    .
++    write;  
++ 
++    # perl4 errors:  Please use commas to separate fields in file
++    # perl5 prints: foo     bar      baz
++
++=item * (scalar context)
++
++The C<caller()> function now returns a false value in a scalar context 
++if there is no caller.  This lets library files determine if they're 
++being required.
++
++    caller() ? (print "You rang?\n") : (print "Got a 0\n");
++  
++    # perl4 errors: There is no caller
++    # perl5 prints: Got a 0
++ 
++=item * (scalar context)
++
++The comma operator in a scalar context is now guaranteed to give a
++scalar context to its arguments.
++
++    @y= ('a','b','c');
++    $x = (1, 2, @y);
++    print "x = $x\n";
++ 
++    # Perl4 prints:  x = c   # Thinks list context interpolates list
++    # Perl5 prints:  x = 3   # Knows scalar uses length of list
++
++=item * (list, builtin)
++
++C<sprintf()> funkiness (array argument converted to scalar array count)
++This test could be added to t/op/sprintf.t
++
++    @z = ('%s%s', 'foo', 'bar');
++    $x = sprintf(@z);
++    if ($x eq 'foobar') {print "ok 2\n";} else {print "not ok 2 '$x'\n";}
++ 
++    # perl4 prints: ok 2
++    # perl5 prints: not ok 2
++
++C<printf()> works fine, though:
++
++    printf STDOUT (@z);
++    print "\n"; 
++ 
++    # perl4 prints: foobar
++    # perl5 prints: foobar
++
++Probably a bug.
++
++=back
++
++=head2 Precedence Traps
++
++Perl4-to-Perl5 traps involving precedence order.
++
++=item * 
++
++These are now semantic errors because of precedence:
++
++    @list = (1,2,3,4,5);
++    %map = ("a",1,"b",2,"c",3,"d",4);
++    $n = shift @list + 2;   # first item in list plus 2
++    print "n is $n, ";
++    $m = keys %map + 2;     # number of items in hash plus 2
++    print "m is $m\n";
++ 
++    # perl4 prints: n is 3, m is 6
++    # perl5 errors and fails to compile
++
++=item * Precedence
+ 
+ The precedence of assignment operators is now the same as the precedence
+ of assignment.  Perl 4 mistakenly gave them the precedence of the associated
+ operator.  So you now must parenthesize them in expressions like
+-
++       
+     /foo/ ? ($a += 2) : ($a -= 2);
+-
++    
+ Otherwise
+ 
+-    /foo/ ? $a += 2 : $a -= 2;
++    /foo/ ? $a += 2 : $a -= 2
+ 
+ would be erroneously parsed as
+ 
+@@ -408,115 +873,418 @@
+ 
+ On the other hand,
+ 
+-    $a += /foo/ ? 1 : 2;
++    $a += /foo/ ? 1 : 2; 
+ 
+ now works as a C programmer would expect.
+ 
+-=item *
++=item * Precedence
+ 
+-C<open FOO || die> is now incorrect.  You need parens around the filehandle.
+-While temporarily supported, using such a construct will 
+-generate a non-fatal (but non-suppressible) warning.
++    open FOO || die;
+ 
+-=item *
++is now incorrect.  You need parens around the filehandle.
++Otherwise, perl5 leaves the statement as it's default precedence:
+ 
+-The elements of argument lists for formats are now evaluated in list
+-context.  This means you can interpolate list values now.
++    open(FOO || die);
++ 
++    # perl4 opens or dies
++    # perl5 errors: Precedence problem: open FOO should be open(FOO)
+ 
+-=item *
++=item * Precedence
+ 
+-You can't do a C<goto> into a block that is optimized away.  Darn.
++perl4 gives the special variable, C<$:> precedence, where perl5
++treats C<$::> as main C<package>
+ 
+-=item *
++    $a = "x"; print "$::a"  
++     
++    # perl 4 prints: -:a
++    # perl 5 prints: x
++    
++=item * Precedence
+ 
+-It is no longer syntactically legal to use whitespace as the name
+-of a variable, or as a delimiter for any kind of quote construct.
+-Double darn.
++concatatination precedence over filetest operator?  
+ 
+-=item *
++    -e $foo .= "q" 
++  
++    # perl4 prints: no output
++    # perl5 prints: Can't modify -e in concatenation
+ 
+-The caller() function now returns a false value in a scalar context if there
+-is no caller.  This lets library files determine if they're being required.
++=back
+ 
+-=item *
++=head2 General Regular Expression Traps using s///, etc.
++
++All types of RE traps.
++
++=over 5
++
++=item * Regular Expression
++
++C<s'$lhs'$rhs'> now does no interpolation on either side.  It used to
++interpolate C<$lhs> but not C<$rhs>.  (And still does not match a literal 
++'$' in string)
++
++    $a=1;$b=2;
++    $string = '1 2 $a $b';
++    $string =~ s'$a'$b';
++    print $string,"\n";
++ 
++    # perl4 prints: $b 2 $a $b
++    # perl5 prints: 1 2 $a $b
++
++=item * Regular Expression
+ 
+ C<m//g> now attaches its state to the searched string rather than the
+-regular expression.
++regular expression.  (Once the scope of a block is left for the sub, the
++state of the searched string is lost)
+ 
+-=item *
++    $_ = "ababab";
++    while(m/ab/g){
++        &doit("blah");
++    }
++    sub doit{local($_) = shift; print "Got $_ "}
++ 
++    # perl4 prints: blah blah blah
++    # perl5 prints: infinite loop blah...
+ 
+-C<reverse> is no longer allowed as the name of a sort subroutine.
++=item * Regular Expression
+ 
+-=item *
++If no parentheses are used in a match, Perl4 sets C<$+> to
++the whole match, just like C<$&>. Perl5 does not.
+ 
+-B<taintperl> is no longer a separate executable.  There is now a B<-T>
+-switch to turn on tainting when it isn't turned on automatically.
++    "abcdef" =~ /b.*e/;
++    print "\$+ = $+\n";
++ 
++    # perl4 prints: bcde
++    # perl5 prints:
+ 
+-=item *
++=item * Regular Expression
+ 
+-Double-quoted strings may no longer end with an unescaped C<$> or C<@>.
++substitution now returns the null string if it fails
+ 
+-=item *
++    $string = "test";
++    $value = ($string =~ s/foo//);
++    print $value, "\n";
++ 
++    # perl4 prints: 0
++    # perl5 prints:
+ 
+-The archaic C<while/if> BLOCK BLOCK syntax is no longer supported.
++Also see L<Numerical Traps> for another example of this new feature.
+ 
++=item * Regular Expression
+ 
+-=item *
++C<s`lhs`rhs`> (using backticks) is now a normal substitution, with no 
++backtick expansion
+ 
+-Negative array subscripts now count from the end of the array.
++    $string = "";
++    $string =~ s`^`hostname`;
++    print $string, "\n";
++ 
++    # perl4 prints: <the local hostname>
++    # perl5 prints: hostname
+ 
+-=item *
++=item * Regular Expression
+ 
+-The comma operator in a scalar context is now guaranteed to give a
+-scalar context to its arguments.
++Stricter parsing of variables used in regular expressions
+ 
+-=item *
++    s/^([^$grpc]*$grpc[$opt$plus$rep]?)//o;
++ 
++    # perl4: compiles w/o error
++    # perl5: with Scalar found where operator expected ..., near "$opt$plus"
+ 
+-The C<**> operator now binds more tightly than unary minus.  
+-It was documented to work this way before, but didn't.
++an added component of this example, apparantly from the same script, is
++the actual value of the s'd string after the substitution.
++C<[$opt]> is a character class in perl4 and an array subscript in perl5
+ 
+-=item *
++    $grpc = 'a'; 
++    $opt  = 'r';
++    $_ = 'bar';
++    s/^([^$grpc]*$grpc[$opt]?)/foo/;
++    print ;
++ 
++    # perl4 prints: foo
++    # perl5 prints: foobar
+ 
+-Setting C<$#array> lower now discards array elements.
++=item * Regular Expression
+ 
+-=item *
++Under perl5, C<m?x?> matches only once, like C<?x?>. Under perl4, it matched
++repeatedly, like C</x/> or C<m!x!>.
+ 
+-delete() is not guaranteed to return the old value for tie()d arrays,
+-since this capability may be onerous for some modules to implement.
++    $test = "once";
++    sub match { $test =~ m?once?; }
++    &match();
++    if( &match() ) {
++        # m?x? matches more then once
++        print "perl4\n";
++    } else { 
++        # m?x? matches only once
++        print "perl5\n"; 
++    }
++ 
++    # perl4 prints: perl4
++    # perl5 prints: perl5
+ 
+-=item *
++
++=back
++
++=head2 Subroutine, Signal, Sorting Traps
++
++The general group of Perl4-to-Perl5 traps having to do with
++Signals, Sorting, and their related subroutines, as well as
++general subroutine traps.  Includes some OS-Specific traps.
++
++=over 5
++
++=item * (Signals)
++
++Barewords that used to look like strings to Perl will now look like subroutine
++calls if a subroutine by that name is defined before the compiler sees them.
++
++    sub SeeYa { warn"Hasta la vista, baby!" }
++    $SIG{'TERM'} = SeeYa;
++    print "SIGTERM is now $SIG{'TERM'}\n";
++ 
++    # perl4 prints: SIGTERM is main'SeeYa
++    # perl5 prints: SIGTERM is now main::1
++
++Use -w to catch this one
++
++=item * (Sort Subroutine)
++
++reverse is no longer allowed as the name of a sort subroutine.
++
++    sub reverse{ print "yup "; $a <=> $b }
++    print sort reverse a,b,c;  
++ 
++    # perl4 prints: yup yup yup yup abc
++    # perl5 prints: abc 
++
++=back
++
++=head2 OS Traps
++
++=over 5
++
++=item * (SysV)
++
++Under HPUX, and some other SysV OS's, one had to reset any signal handler, 
++within  the signal handler function, each time a signal was handled with 
++perl4.  With perl5, the reset is now done correctly.  Any code relying 
++on the handler _not_ being reset will have to be reworked.
++
++5.002 and beyond uses sigaction() under SysV
++
++    sub gotit {
++        print "Got @_... "; 
++    }  
++    $SIG{'INT'} = 'gotit';
++   
++    $| = 1;
++    $pid = fork;
++    if ($pid) {
++        kill('INT', $pid);
++        sleep(1);
++        kill('INT', $pid);
++    } else { 
++        while (1) {sleep(10);}
++    } 
++ 
++    # perl4 (HPUX) prints: Got INT...
++    # perl5 (HPUX) prints: Got INT... Got INT...
++
++=item * (SysV)
++
++Under SysV OS's, C<seek()> on a file opened to append C<E<gt>E<gt>> now does 
++the right thing w.r.t. the fopen() man page. e.g. - When a file is opened
++for append,  it  is  impossible to overwrite information already in
++the file.
++
++    open(TEST,">>seek.test");
++    $start = tell TEST ;  
++    foreach(1 .. 9){
++        print TEST "$_ ";
++    }
++    $end = tell TEST ;
++    seek(TEST,$start,0);
++    print TEST "18 characters here";
++ 
++    # perl4 (solaris) seek.test has: 18 characters here
++    # perl5 (solaris) seek.test has: 1 2 3 4 5 6 7 8 9 18 characters here
++
++
++
++=back
++
++=head2 Interpolation Traps
++
++=over 5
++
++=item * Interpolation
++
++@ now always interpolates an array in double-quotish strings.
++
++    print "To: someone@somewhere.com\n"; 
++ 
++    # perl4 prints: To:someone@somewhere.com
++    # perl5 errors : Literal @somewhere now requires backslash
++
++=item * Interpolation
++
++Perl4-to-Perl5 traps having to do with how things get interpolated
++within certain expressions, statements, contexts, or whatever.
++
++Double-quoted strings may no longer end with an unescaped $ or @.
++
++    $foo = "foo$";
++    $bar = "bar@";
++    print "foo is $foo, bar is $bar\n";
++     
++    # perl4 prints: foo is foo$, bar is bar@
++    # perl5 errors: Final $ should be \$ or $name
++
++Note: perl5 DOES NOT error on the terminating @ in $bar
++
++=item * Interpolation
+ 
+ The construct "this is $$x" used to interpolate the pid at that
+-point, but now tries to dereference $x.  C<$$> by itself still
++point, but now apparantly tries to dereference C<$x>.  C<$$> by itself still
+ works fine, however.
+ 
+-=item *
++    print "this is $$x\n";
+ 
+-The meaning of foreach has changed slightly when it is iterating over a
+-list which is not an array.  This used to assign the list to a
+-temporary array, but no longer does so (for efficiency).  This means
+-that you'll now be iterating over the actual values, not over copies of
+-the values.  Modifications to the loop variable can change the original
+-values.  To retain Perl 4 semantics you need to assign your list
+-explicitly to a temporary array and then iterate over that.  For
+-example, you might need to change
++    # perl4 prints: this is XXXx   (XXX is the current pid)
++    # perl5 prints: this is
+ 
+-    foreach $var (grep /x/, @list) { ... }
++=item * Interpolation
++
++Creation of hashes on the fly with C<eval "EXPR"> now requires either both 
++C<$>'s to be protected in the specification of the hash name, or both curlies 
++to be protected.  If both curlies are protected, the result will be compatible
++with perl4 and perl5.  This is a very common practice, and should be changed
++to use the block form of C<eval{}>  if possible.
++
++    $hashname = "foobar";
++    $key = "baz";
++    $value = 1234;
++    eval "\$$hashname{'$key'} = q|$value|";
++    (defined($foobar{'baz'})) ?  (print "Yup") : (print "Nope");
++
++    # perl4 prints: Yup
++    # perl5 prints: Nope
++
++Changing
++
++    eval "\$$hashname{'$key'} = q|$value|";
+ 
+ to
+ 
+-    foreach $var (my @tmp = grep /x/, @list) { ... }
++    eval "\$\$hashname{'$key'} = q|$value|";
+ 
+-Otherwise changing C<$var> will clobber the values of @list.  (This most often
+-happens when you use C<$_> for the loop variable, and call subroutines in
+-the loop that don't properly localize C<$_>.)
++causes the following result:
+ 
+-=item *
++    # perl4 prints: Nope
++    # perl5 prints: Yup
+ 
+-Some error messages will be different.
++or, changing to
+ 
+-=item *
++    eval "\$$hashname\{'$key'\} = q|$value|";
+ 
+-Some bugs may have been inadvertently removed.
++causes the following result:
++
++    # perl4 prints: Yup
++    # perl5 prints: Yup
++    # and is compatible for both versions
++
++
++=item * Interpolation
++
++perl4 programs which unconsciously rely on the bugs in earlier perl versions.
++
++    perl -e '$bar=q/not/; print "This is $foo{$bar} perl5"'
++     
++    # perl4 prints: This is not perl5
++    # perl5 prints: This is perl5
++
++=item * Interpolation
++
++You also have to be careful about array references.  
++
++    print "$foo{"
++
++    perl 4 prints: {
++    perl 5 prints: syntax error
++
++=item * Interpolation
++
++Similarly, watch out for:
++
++    $foo = "array";
++    print "\$$foo{bar}\n";
++  
++    # perl4 prints: $array{bar}
++    # perl5 prints: $
++
++Perl 5 is looking for C<$array{bar}> which doesn't exist, but perl 4 is
++happy just to expand $foo to "array" by itself.  Watch out for this
++especially in C<eval>'s.
++
++=item * Interpolation
++
++C<qq()> string passed to C<eval>
++
++    eval qq(
++        foreach \$y (keys %\$x\) {
++            \$count++;
++        }
++    );
++  
++    # perl4 runs this ok
++    # perl5 prints: Can't find string terminator ")" 
++
++=back
++
++=head2 Unclassified Traps
++
++Everything else.
++
++=over 5
++
++=item * Unclassified
++
++Existing dbm databases created under perl4 (or any other dbm/ndbm tool)
++may cause the same script, run under perl5, to fail.  The build of perl5
++must have been linked with the same dbm/ndbm as the default for C<dbmopen()>
++to function properly without C<tie>'ing to an extension dbm implementation.
++
++    dbmopen (%dbm, "file", undef);
++    print "ok\n";
++
++    # perl4 prints: ok
++    # perl5 prints: ok (IFF linked with -ldbm or -lndbm)
++
++=item * Unclassified
++
++C<require>/C<do> trap using returned value
++
++If the file doit.pl has:
++
++    sub foo {
++        $rc = do "./do.pl";
++        return 8;
++    } 
++    print &foo, "\n";
++
++And the do.pl file has the following single line:
++
++    return 3;
++
++Running doit.pl gives the following:
++
++    # perl 4 prints: 3 (aborts the subroutine early)
++    # perl 5 prints: 8 
++
++Same behavior if you replace C<do> with C<require>.
+ 
+ =back
++
++As always, if any of these are ever officially declared as bugs, 
++they'll be fixed and removed.
++
diff --git a/japanese/perl5/files/patch-ad b/japanese/perl5/files/patch-ad
new file mode 100644
index 000000000000..dacef7ef6def
--- /dev/null
+++ b/japanese/perl5/files/patch-ad
@@ -0,0 +1,44 @@
+--- hints/freebsd.sh.orig	Mon Feb 12 21:52:51 1996
++++ hints/freebsd.sh	Wed Oct 23 18:00:16 1996
+@@ -43,16 +43,39 @@
+ 	d_setruid='undef'
+ 	;;
+ #
+-# Trying to cover 2.0.5, 2.1-current and future 2.1
++# Trying to cover 2.0.5, 2.1-current and future 2.1/2.2
+ # It does not covert all 2.1-current versions as the output of uname
+ # changed a few times.
+ #
++# Even though seteuid/setegid are available, they've been turned off
++# because perl isn't coded with saved set[ug]id variables in mind.
++# In addition, a small patch is requried to suidperl to avoid a security
++# problem with FreeBSD.
++#
+ 2.0.5*|2.0-built*|2.1*)
+  	usevfork='true'
++	d_dosuid='define'
++	d_setregid='define'
++	d_setreuid='define'
++	d_setegid='undef'
++	d_seteuid='undef'
++	;;
++#
++# 2.2 and above have phkmalloc(3).
++2.2*)
++ 	usevfork='true'
++	usemymalloc='n'
++	d_dosuid='define'
++	d_setregid='define'
++	d_setreuid='define'
++	d_setegid='undef'
++	d_seteuid='undef'
+ 	;;
+ #
+-# Guesses at what will be needed after 2.1
++# Guesses at what will be needed after 2.2
+ *)	usevfork='true'
++	usemymalloc='n'
++	d_dosuid='define'
+ 	;;
+ esac
+ 
diff --git a/japanese/perl5/files/patch-ae b/japanese/perl5/files/patch-ae
new file mode 100644
index 000000000000..def0493a1c27
--- /dev/null
+++ b/japanese/perl5/files/patch-ae
@@ -0,0 +1,46 @@
+*** installperl.orig	Mon Jun 24 22:08:25 1996
+--- installperl	Wed Jun 26 22:21:05 1996
+***************
+*** 89,95 ****
+  &safe_unlink("$installbin/sperl$ver$exe_ext");
+  if ($d_dosuid) {
+      &cmd("cp suidperl$exe_ext $installbin/sperl$ver$exe_ext");
+!     &chmod(04711, "$installbin/sperl$ver$exe_ext");
+  }
+  
+  exit 0 if $versiononly;
+--- 89,95 ----
+  &safe_unlink("$installbin/sperl$ver$exe_ext");
+  if ($d_dosuid) {
+      &cmd("cp suidperl$exe_ext $installbin/sperl$ver$exe_ext");
+!     &chmod(04111, "$installbin/sperl$ver$exe_ext");
+  }
+  
+  exit 0 if $versiononly;
+***************
+*** 203,212 ****
+  	      ((readlink "$mainperldir/perl$exe_ext") eq "$binexp/perl$exe_ext"));
+      }
+      if ((! $mainperl_is_instperl) &&
+! 	(&yn("Many scripts expect perl to be installed as " .
+! 	     "$mainperldir/perl.\n" . 
+! 	     "Do you wish to have $mainperldir/perl be the same as\n" .
+! 	     "$binexp/perl? [y] ")))
+      {	
+  	unlink("$mainperldir/perl$exe_ext");
+  	eval 'link("$installbin/perl$exe_ext", "$mainperldir/perl$exe_ext")' ||
+--- 203,216 ----
+  	      ((readlink "$mainperldir/perl$exe_ext") eq "$binexp/perl$exe_ext"));
+      }
+      if ((! $mainperl_is_instperl) &&
+! 	0)
+! #	Disable Perl5 from 'taking' over from the system Perl.
+! #	(nasty hack, but it is only for the FreeBSD build, so WTH.
+! #
+! #	(&yn("Many scripts expect perl to be installed as " .
+! #	     "$mainperldir/perl.\n" . 
+! #	     "Do you wish to have $mainperldir/perl be the same as\n" .
+! #	     "$binexp/perl? [y] ")))
+      {	
+  	unlink("$mainperldir/perl$exe_ext");
+  	eval 'link("$installbin/perl$exe_ext", "$mainperldir/perl$exe_ext")' ||
diff --git a/japanese/perl5/pkg-comment b/japanese/perl5/pkg-comment
new file mode 100644
index 000000000000..b4da212402a3
--- /dev/null
+++ b/japanese/perl5/pkg-comment
@@ -0,0 +1 @@
+Pattern Extraction and Recognition Language + Japanese patches.
diff --git a/japanese/perl5/pkg-descr b/japanese/perl5/pkg-descr
new file mode 100644
index 000000000000..4e8fd4bf10e5
--- /dev/null
+++ b/japanese/perl5/pkg-descr
@@ -0,0 +1,53 @@
+
+* jp-perl-5.003
+
+	This port collection was used:
+		port collection lang/perl5
+				by markm@FreeBSD.ORG,
+	    and jperl5.003.patch7_1
+				by yasushi@cs.washington.edu. 
+
+* known PROBLEMS
+
+	   If you set envirment variable `LANG' to ja_JP.EUC, 
+	*jperl/perl* output `warning: setlocale(LC_CTYPE, "") failed.'
+
+	   I don't have solution. If you have, please contact me :-)
+
+	   If you do not need setting locale, edit Makefile as below
+	and reinstall jperl.
+
+Thank you.
+
+-------- patch to Makefile
+--- Makefile.org	Sun Jan 12 22:17:05 1997
++++ Makefile	Sun Jan 12 22:17:36 1997
+@@ -40,7 +40,7 @@
+ 
+ HAS_CONFIGURE=		yes
+ CONFIGURE_SCRIPT=	Configure
+-CONFIGURE_ARGS=		-sde -Dprefix=${PREFIX}
++CONFIGURE_ARGS=		-sde -Dprefix=${PREFIX} -U d_setlocale
+ 
+ MAN1= 	perlbook.1 perlbot.1 perlcall.1 perldata.1 perldebug.1 perldiag.1  \
+ 	perlembed.1 perlform.1 perlfunc.1 perlguts.1 perlipc.1 perllol.1   \
+---------
+
+----------- From lang/perl5/pkg/DESC
+From the distribution README:
+
+Perl is a language that combines some of the features of C, sed, awk
+and shell.  See the manual page for more hype.  There are also two Nutshell
+Handbooks published by O'Reilly & Assoc.  See pod/perlbook.pod
+for more information.
+
+--
+
+This port will not work on FreeBSD 2.0, nor will it work on earlier snapshots.
+This is due to a bug in vprintf in the C library.
+
+- MarkM
+----------
+
+- Yoshiro MIHIRA
+(sanpei@yy.cs.keio.ac.jp)
diff --git a/japanese/perl5/pkg-plist b/japanese/perl5/pkg-plist
new file mode 100644
index 000000000000..234fdc2b091c
--- /dev/null
+++ b/japanese/perl5/pkg-plist
@@ -0,0 +1,497 @@
+bin/perl5.003
+@exec ln -fs %D/%F %B/perl
+@unexec rm %B/perl
+@exec ln -fs %D/%F %B/jperl
+@unexec rm %B/jperl
+bin/sperl5.003
+@exec ln -f %D/%F %B/suidperl
+@unexec rm %B/suidperl
+bin/a2p
+bin/c2ph
+bin/h2ph
+bin/h2xs
+bin/pstruct
+bin/perlbug
+bin/perldoc
+bin/s2p
+bin/find2perl
+bin/pod2man
+bin/pod2html
+bin/pod2latex
+bin/pod2text
+lib/perl5/pod/jperl.pod
+lib/perl5/pod/perl.pod
+lib/perl5/pod/perlbook.pod
+lib/perl5/pod/perlbot.pod
+lib/perl5/pod/perlcall.pod
+lib/perl5/pod/perldata.pod
+lib/perl5/pod/perldebug.pod
+lib/perl5/pod/perldiag.pod
+lib/perl5/pod/perldsc.pod
+lib/perl5/pod/perlembed.pod
+lib/perl5/pod/perlform.pod
+lib/perl5/pod/perlfunc.pod
+lib/perl5/pod/perlguts.pod
+lib/perl5/pod/perlipc.pod
+lib/perl5/pod/perllol.pod
+lib/perl5/pod/perlmod.pod
+lib/perl5/pod/perlobj.pod
+lib/perl5/pod/perlop.pod
+lib/perl5/pod/perlovl.pod
+lib/perl5/pod/perlpod.pod
+lib/perl5/pod/perlre.pod
+lib/perl5/pod/perlref.pod
+lib/perl5/pod/perlrun.pod
+lib/perl5/pod/perlsec.pod
+lib/perl5/pod/perlstyle.pod
+lib/perl5/pod/perlsub.pod
+lib/perl5/pod/perlsyn.pod
+lib/perl5/pod/perltie.pod
+lib/perl5/pod/perltoc.pod
+lib/perl5/pod/perltrap.pod
+lib/perl5/pod/perlvar.pod
+lib/perl5/pod/perlxs.pod
+lib/perl5/pod/perlxstut.pod
+lib/perl5/i386-freebsd/5.003/Config.pm
+lib/perl5/i386-freebsd/5.003/auto/DynaLoader/DynaLoader.a
+@exec ranlib %D/%F
+lib/perl5/i386-freebsd/5.003/auto/DynaLoader/extralibs.ld
+lib/perl5/i386-freebsd/5.003/auto/DB_File/DB_File.so
+lib/perl5/i386-freebsd/5.003/auto/DB_File/DB_File.bs
+lib/perl5/i386-freebsd/5.003/auto/Fcntl/Fcntl.so
+lib/perl5/i386-freebsd/5.003/auto/Fcntl/Fcntl.bs
+lib/perl5/i386-freebsd/5.003/auto/FileHandle/FileHandle.so
+lib/perl5/i386-freebsd/5.003/auto/FileHandle/FileHandle.bs
+lib/perl5/i386-freebsd/5.003/auto/NDBM_File/NDBM_File.so
+lib/perl5/i386-freebsd/5.003/auto/NDBM_File/NDBM_File.bs
+lib/perl5/i386-freebsd/5.003/auto/POSIX/POSIX.so
+lib/perl5/i386-freebsd/5.003/auto/POSIX/POSIX.bs
+lib/perl5/i386-freebsd/5.003/auto/SDBM_File/SDBM_File.so
+lib/perl5/i386-freebsd/5.003/auto/SDBM_File/SDBM_File.bs
+lib/perl5/i386-freebsd/5.003/auto/Safe/Safe.so
+lib/perl5/i386-freebsd/5.003/auto/Safe/Safe.bs
+lib/perl5/i386-freebsd/5.003/auto/Socket/Socket.so
+lib/perl5/i386-freebsd/5.003/auto/Socket/Socket.bs
+lib/perl5/i386-freebsd/5.003/CORE/EXTERN.h
+lib/perl5/i386-freebsd/5.003/CORE/kanji.h
+lib/perl5/i386-freebsd/5.003/CORE/INTERN.h
+lib/perl5/i386-freebsd/5.003/CORE/XSUB.h
+lib/perl5/i386-freebsd/5.003/CORE/av.h
+lib/perl5/i386-freebsd/5.003/CORE/config.h
+lib/perl5/i386-freebsd/5.003/CORE/cop.h
+lib/perl5/i386-freebsd/5.003/CORE/cv.h
+lib/perl5/i386-freebsd/5.003/CORE/dosish.h
+lib/perl5/i386-freebsd/5.003/CORE/embed.h
+lib/perl5/i386-freebsd/5.003/CORE/form.h
+lib/perl5/i386-freebsd/5.003/CORE/gv.h
+lib/perl5/i386-freebsd/5.003/CORE/handy.h
+lib/perl5/i386-freebsd/5.003/CORE/hv.h
+lib/perl5/i386-freebsd/5.003/CORE/keywords.h
+lib/perl5/i386-freebsd/5.003/CORE/mg.h
+lib/perl5/i386-freebsd/5.003/CORE/op.h
+lib/perl5/i386-freebsd/5.003/CORE/opcode.h
+lib/perl5/i386-freebsd/5.003/CORE/patchlevel.h
+lib/perl5/i386-freebsd/5.003/CORE/perl.h
+lib/perl5/i386-freebsd/5.003/CORE/perly.h
+lib/perl5/i386-freebsd/5.003/CORE/pp.h
+lib/perl5/i386-freebsd/5.003/CORE/proto.h
+lib/perl5/i386-freebsd/5.003/CORE/regcomp.h
+lib/perl5/i386-freebsd/5.003/CORE/regexp.h
+lib/perl5/i386-freebsd/5.003/CORE/scope.h
+lib/perl5/i386-freebsd/5.003/CORE/sv.h
+lib/perl5/i386-freebsd/5.003/CORE/unixish.h
+lib/perl5/i386-freebsd/5.003/CORE/util.h
+lib/perl5/i386-freebsd/5.003/CORE/libperl.a
+@exec ranlib %D/%F
+lib/perl5/i386-freebsd/5.003/CORE/sperl.o
+lib/perl5/AnyDBM_File.pm
+lib/perl5/AutoLoader.pm
+lib/perl5/AutoSplit.pm
+lib/perl5/Benchmark.pm
+lib/perl5/Carp.pm
+lib/perl5/Cwd.pm
+lib/perl5/Devel/SelfStubber.pm
+lib/perl5/DirHandle.pm
+lib/perl5/English.pm
+lib/perl5/Env.pm
+lib/perl5/Exporter.pm
+lib/perl5/ExtUtils/Install.pm
+lib/perl5/ExtUtils/Liblist.pm
+lib/perl5/ExtUtils/MM_OS2.pm
+lib/perl5/ExtUtils/MM_Unix.pm
+lib/perl5/ExtUtils/MM_VMS.pm
+lib/perl5/ExtUtils/MakeMaker.pm
+lib/perl5/ExtUtils/Manifest.pm
+lib/perl5/ExtUtils/Mkbootstrap.pm
+lib/perl5/ExtUtils/Mksymlists.pm
+lib/perl5/ExtUtils/typemap
+lib/perl5/ExtUtils/xsubpp
+lib/perl5/ExtUtils/testlib.pm
+lib/perl5/ExtUtils/Miniperl.pm
+lib/perl5/File/Basename.pm
+lib/perl5/File/CheckTree.pm
+lib/perl5/File/Copy.pm
+lib/perl5/File/Find.pm
+lib/perl5/File/Path.pm
+lib/perl5/FileCache.pm
+lib/perl5/Getopt/Long.pm
+lib/perl5/Getopt/Std.pm
+lib/perl5/I18N/Collate.pm
+lib/perl5/I18N/Japanese.pm
+lib/perl5/IPC/Open2.pm
+lib/perl5/IPC/Open3.pm
+lib/perl5/Math/BigFloat.pm
+lib/perl5/Math/BigInt.pm
+lib/perl5/Math/Complex.pm
+lib/perl5/Net/Ping.pm
+lib/perl5/Pod/Functions.pm
+lib/perl5/Pod/Text.pm
+lib/perl5/Search/Dict.pm
+lib/perl5/SelectSaver.pm
+lib/perl5/SelfLoader.pm
+lib/perl5/Shell.pm
+lib/perl5/Symbol.pm
+lib/perl5/Sys/Hostname.pm
+lib/perl5/Sys/Syslog.pm
+lib/perl5/Term/Cap.pm
+lib/perl5/Term/Complete.pm
+lib/perl5/Term/ReadLine.pm
+lib/perl5/Test/Harness.pm
+lib/perl5/Text/Abbrev.pm
+lib/perl5/Text/ParseWords.pm
+lib/perl5/Text/Soundex.pm
+lib/perl5/Text/Tabs.pm
+lib/perl5/Text/Wrap.pm
+lib/perl5/Tie/Hash.pm
+lib/perl5/Tie/Scalar.pm
+lib/perl5/Tie/SubstrHash.pm
+lib/perl5/Time/Local.pm
+lib/perl5/abbrev.pl
+lib/perl5/assert.pl
+lib/perl5/bigfloat.pl
+lib/perl5/bigint.pl
+lib/perl5/bigrat.pl
+lib/perl5/cacheout.pl
+lib/perl5/chat2.inter
+lib/perl5/chat2.pl
+lib/perl5/complete.pl
+lib/perl5/ctime.pl
+lib/perl5/diagnostics.pm
+lib/perl5/dotsh.pl
+lib/perl5/dumpvar.pl
+lib/perl5/exceptions.pl
+lib/perl5/fastcwd.pl
+lib/perl5/find.pl
+lib/perl5/finddepth.pl
+lib/perl5/flush.pl
+lib/perl5/ftp.pl
+lib/perl5/getcwd.pl
+lib/perl5/getopt.pl
+lib/perl5/getopts.pl
+lib/perl5/hostname.pl
+lib/perl5/importenv.pl
+lib/perl5/integer.pm
+lib/perl5/less.pm
+lib/perl5/lib.pm
+lib/perl5/look.pl
+lib/perl5/newgetopt.pl
+lib/perl5/open2.pl
+lib/perl5/open3.pl
+lib/perl5/overload.pm
+lib/perl5/perl5db.pl
+lib/perl5/pwd.pl
+lib/perl5/shellwords.pl
+lib/perl5/sigtrap.pm
+lib/perl5/splain
+lib/perl5/stat.pl
+lib/perl5/strict.pm
+lib/perl5/subs.pm
+lib/perl5/syslog.pl
+lib/perl5/tainted.pl
+lib/perl5/termcap.pl
+lib/perl5/timelocal.pl
+lib/perl5/validate.pl
+lib/perl5/vars.pm
+lib/perl5/auto/Text/ParseWords/shellwords.al
+lib/perl5/auto/Text/ParseWords/quotewords.al
+lib/perl5/auto/Text/ParseWords/old_shellwords.al
+lib/perl5/auto/Text/ParseWords/autosplit.ix
+lib/perl5/auto/DynaLoader/dl_findfile.al
+lib/perl5/auto/DynaLoader/dl_expandspec.al
+lib/perl5/auto/DynaLoader/autosplit.ix
+lib/perl5/auto/DB_File/autosplit.ix
+lib/perl5/auto/Fcntl/autosplit.ix
+lib/perl5/auto/POSIX/assert.al
+lib/perl5/auto/POSIX/tolower.al
+lib/perl5/auto/POSIX/toupper.al
+lib/perl5/auto/POSIX/closedir.al
+lib/perl5/auto/POSIX/opendir.al
+lib/perl5/auto/POSIX/readdir.al
+lib/perl5/auto/POSIX/rewinddir.al
+lib/perl5/auto/POSIX/errno.al
+lib/perl5/auto/POSIX/creat.al
+lib/perl5/auto/POSIX/fcntl.al
+lib/perl5/auto/POSIX/getgrgid.al
+lib/perl5/auto/POSIX/getgrnam.al
+lib/perl5/auto/POSIX/atan2.al
+lib/perl5/auto/POSIX/cos.al
+lib/perl5/auto/POSIX/exp.al
+lib/perl5/auto/POSIX/fabs.al
+lib/perl5/auto/POSIX/log.al
+lib/perl5/auto/POSIX/pow.al
+lib/perl5/auto/POSIX/sin.al
+lib/perl5/auto/POSIX/sqrt.al
+lib/perl5/auto/POSIX/getpwnam.al
+lib/perl5/auto/POSIX/getpwuid.al
+lib/perl5/auto/POSIX/longjmp.al
+lib/perl5/auto/POSIX/setjmp.al
+lib/perl5/auto/POSIX/kill.al
+lib/perl5/auto/POSIX/feof.al
+lib/perl5/auto/POSIX/siglongjmp.al
+lib/perl5/auto/POSIX/sigsetjmp.al
+lib/perl5/auto/POSIX/raise.al
+lib/perl5/auto/POSIX/offsetof.al
+lib/perl5/auto/POSIX/clearerr.al
+lib/perl5/auto/POSIX/fclose.al
+lib/perl5/auto/POSIX/fdopen.al
+lib/perl5/auto/POSIX/fgetc.al
+lib/perl5/auto/POSIX/fgets.al
+lib/perl5/auto/POSIX/fileno.al
+lib/perl5/auto/POSIX/fopen.al
+lib/perl5/auto/POSIX/fprintf.al
+lib/perl5/auto/POSIX/fputc.al
+lib/perl5/auto/POSIX/fputs.al
+lib/perl5/auto/POSIX/fread.al
+lib/perl5/auto/POSIX/freopen.al
+lib/perl5/auto/POSIX/fscanf.al
+lib/perl5/auto/POSIX/fseek.al
+lib/perl5/auto/POSIX/ferror.al
+lib/perl5/auto/POSIX/fflush.al
+lib/perl5/auto/POSIX/fgetpos.al
+lib/perl5/auto/POSIX/fsetpos.al
+lib/perl5/auto/POSIX/ftell.al
+lib/perl5/auto/POSIX/fwrite.al
+lib/perl5/auto/POSIX/getc.al
+lib/perl5/auto/POSIX/getchar.al
+lib/perl5/auto/POSIX/gets.al
+lib/perl5/auto/POSIX/perror.al
+lib/perl5/auto/POSIX/printf.al
+lib/perl5/auto/POSIX/putc.al
+lib/perl5/auto/POSIX/putchar.al
+lib/perl5/auto/POSIX/puts.al
+lib/perl5/auto/POSIX/remove.al
+lib/perl5/auto/POSIX/rename.al
+lib/perl5/auto/POSIX/rewind.al
+lib/perl5/auto/POSIX/scanf.al
+lib/perl5/auto/POSIX/sprintf.al
+lib/perl5/auto/POSIX/sscanf.al
+lib/perl5/auto/POSIX/tmpfile.al
+lib/perl5/auto/POSIX/ungetc.al
+lib/perl5/auto/POSIX/vfprintf.al
+lib/perl5/auto/POSIX/vprintf.al
+lib/perl5/auto/POSIX/vsprintf.al
+lib/perl5/auto/POSIX/abs.al
+lib/perl5/auto/POSIX/atexit.al
+lib/perl5/auto/POSIX/atof.al
+lib/perl5/auto/POSIX/atoi.al
+lib/perl5/auto/POSIX/atol.al
+lib/perl5/auto/POSIX/bsearch.al
+lib/perl5/auto/POSIX/calloc.al
+lib/perl5/auto/POSIX/div.al
+lib/perl5/auto/POSIX/exit.al
+lib/perl5/auto/POSIX/free.al
+lib/perl5/auto/POSIX/getenv.al
+lib/perl5/auto/POSIX/labs.al
+lib/perl5/auto/POSIX/ldiv.al
+lib/perl5/auto/POSIX/malloc.al
+lib/perl5/auto/POSIX/qsort.al
+lib/perl5/auto/POSIX/rand.al
+lib/perl5/auto/POSIX/realloc.al
+lib/perl5/auto/POSIX/srand.al
+lib/perl5/auto/POSIX/strtod.al
+lib/perl5/auto/POSIX/strtol.al
+lib/perl5/auto/POSIX/stroul.al
+lib/perl5/auto/POSIX/system.al
+lib/perl5/auto/POSIX/memchr.al
+lib/perl5/auto/POSIX/memcmp.al
+lib/perl5/auto/POSIX/memcpy.al
+lib/perl5/auto/POSIX/memmove.al
+lib/perl5/auto/POSIX/memset.al
+lib/perl5/auto/POSIX/strcat.al
+lib/perl5/auto/POSIX/strchr.al
+lib/perl5/auto/POSIX/strcmp.al
+lib/perl5/auto/POSIX/strcpy.al
+lib/perl5/auto/POSIX/strcspn.al
+lib/perl5/auto/POSIX/strerror.al
+lib/perl5/auto/POSIX/strlen.al
+lib/perl5/auto/POSIX/strncat.al
+lib/perl5/auto/POSIX/strncmp.al
+lib/perl5/auto/POSIX/strncpy.al
+lib/perl5/auto/POSIX/strpbrk.al
+lib/perl5/auto/POSIX/strrchr.al
+lib/perl5/auto/POSIX/strspn.al
+lib/perl5/auto/POSIX/strstr.al
+lib/perl5/auto/POSIX/strtok.al
+lib/perl5/auto/POSIX/chmod.al
+lib/perl5/auto/POSIX/fstat.al
+lib/perl5/auto/POSIX/mkdir.al
+lib/perl5/auto/POSIX/stat.al
+lib/perl5/auto/POSIX/umask.al
+lib/perl5/auto/POSIX/wait.al
+lib/perl5/auto/POSIX/waitpid.al
+lib/perl5/auto/POSIX/gmtime.al
+lib/perl5/auto/POSIX/localtime.al
+lib/perl5/auto/POSIX/time.al
+lib/perl5/auto/POSIX/alarm.al
+lib/perl5/auto/POSIX/chdir.al
+lib/perl5/auto/POSIX/chown.al
+lib/perl5/auto/POSIX/execl.al
+lib/perl5/auto/POSIX/execle.al
+lib/perl5/auto/POSIX/execlp.al
+lib/perl5/auto/POSIX/execv.al
+lib/perl5/auto/POSIX/execve.al
+lib/perl5/auto/POSIX/execvp.al
+lib/perl5/auto/POSIX/fork.al
+lib/perl5/auto/POSIX/getcwd.al
+lib/perl5/auto/POSIX/getegid.al
+lib/perl5/auto/POSIX/geteuid.al
+lib/perl5/auto/POSIX/getgid.al
+lib/perl5/auto/POSIX/getgroups.al
+lib/perl5/auto/POSIX/getlogin.al
+lib/perl5/auto/POSIX/getpgrp.al
+lib/perl5/auto/POSIX/getpid.al
+lib/perl5/auto/POSIX/getppid.al
+lib/perl5/auto/POSIX/getuid.al
+lib/perl5/auto/POSIX/isatty.al
+lib/perl5/auto/POSIX/link.al
+lib/perl5/auto/POSIX/rmdir.al
+lib/perl5/auto/POSIX/setgid.al
+lib/perl5/auto/POSIX/setuid.al
+lib/perl5/auto/POSIX/sleep.al
+lib/perl5/auto/POSIX/unlink.al
+lib/perl5/auto/POSIX/utime.al
+lib/perl5/auto/POSIX/autosplit.ix
+lib/perl5/auto/Socket/autosplit.ix
+lib/perl5/DynaLoader.pm
+lib/perl5/DB_File.pm
+lib/perl5/Fcntl.pm
+lib/perl5/FileHandle.pm
+lib/perl5/NDBM_File.pm
+lib/perl5/POSIX.pod
+lib/perl5/POSIX.pm
+lib/perl5/SDBM_File.pm
+lib/perl5/Safe.pm
+lib/perl5/Socket.pm
+lib/perl5/man/man3/AnyDBM_File.3.gz
+lib/perl5/man/man3/AutoLoader.3.gz
+lib/perl5/man/man3/AutoSplit.3.gz
+lib/perl5/man/man3/Benchmark.3.gz
+lib/perl5/man/man3/Carp.3.gz
+lib/perl5/man/man3/Cwd.3.gz
+lib/perl5/man/man3/DirHandle.3.gz
+lib/perl5/man/man3/ExtUtils::Manifest.3.gz
+lib/perl5/man/man3/Devel::SelfStubber.3.gz
+lib/perl5/man/man3/English.3.gz
+lib/perl5/man/man3/Env.3.gz
+lib/perl5/man/man3/Exporter.3.gz
+lib/perl5/man/man3/I18N::Japanese.3.gz
+lib/perl5/man/man3/Term::Cap.3.gz
+lib/perl5/man/man3/Shell.3.gz
+lib/perl5/man/man3/ExtUtils::Install.3.gz
+lib/perl5/man/man3/ExtUtils::Liblist.3.gz
+lib/perl5/man/man3/ExtUtils::MM_OS2.3.gz
+lib/perl5/man/man3/ExtUtils::MM_Unix.3.gz
+lib/perl5/man/man3/ExtUtils::MM_VMS.3.gz
+lib/perl5/man/man3/ExtUtils::MakeMaker.3.gz
+lib/perl5/man/man3/FileCache.3.gz
+lib/perl5/man/man3/ExtUtils::Mkbootstrap.3.gz
+lib/perl5/man/man3/ExtUtils::Mksymlists.3.gz
+lib/perl5/man/man3/ExtUtils::testlib.3.gz
+lib/perl5/man/man3/ExtUtils::Miniperl.3.gz
+lib/perl5/man/man3/File::Basename.3.gz
+lib/perl5/man/man3/File::CheckTree.3.gz
+lib/perl5/man/man3/File::Copy.3.gz
+lib/perl5/man/man3/File::Find.3.gz
+lib/perl5/man/man3/File::Path.3.gz
+lib/perl5/man/man3/Getopt::Long.3.gz
+lib/perl5/man/man3/Getopt::Std.3.gz
+lib/perl5/man/man3/I18N::Collate.3.gz
+lib/perl5/man/man3/IPC::Open2.3.gz
+lib/perl5/man/man3/IPC::Open3.3.gz
+lib/perl5/man/man3/Math::BigFloat.3.gz
+lib/perl5/man/man3/Math::BigInt.3.gz
+lib/perl5/man/man3/Math::Complex.3.gz
+lib/perl5/man/man3/Net::Ping.3.gz
+lib/perl5/man/man3/Pod::Text.3.gz
+lib/perl5/man/man3/Search::Dict.3.gz
+lib/perl5/man/man3/SelectSaver.3.gz
+lib/perl5/man/man3/SelfLoader.3.gz
+lib/perl5/man/man3/Symbol.3.gz
+lib/perl5/man/man3/Text::ParseWords.3.gz
+lib/perl5/man/man3/Sys::Hostname.3.gz
+lib/perl5/man/man3/Sys::Syslog.3.gz
+lib/perl5/man/man3/Term::Complete.3.gz
+lib/perl5/man/man3/Term::ReadLine.3.gz
+lib/perl5/man/man3/Test::Harness.3.gz
+lib/perl5/man/man3/Text::Abbrev.3.gz
+lib/perl5/man/man3/subs.3.gz
+lib/perl5/man/man3/Text::Soundex.3.gz
+lib/perl5/man/man3/Text::Tabs.3.gz
+lib/perl5/man/man3/Text::Wrap.3.gz
+lib/perl5/man/man3/Tie::Hash.3.gz
+lib/perl5/man/man3/Tie::Scalar.3.gz
+lib/perl5/man/man3/Tie::SubstrHash.3.gz
+lib/perl5/man/man3/Time::Local.3.gz
+lib/perl5/man/man3/diagnostics.3.gz
+lib/perl5/man/man3/integer.3.gz
+lib/perl5/man/man3/less.3.gz
+lib/perl5/man/man3/lib.3.gz
+lib/perl5/man/man3/overload.3.gz
+lib/perl5/man/man3/sigtrap.3.gz
+lib/perl5/man/man3/strict.3.gz
+lib/perl5/man/man3/vars.3.gz
+lib/perl5/man/man3/Config.3.gz
+lib/perl5/man/man3/DynaLoader.3.gz
+lib/perl5/man/man3/DB_File.3.gz
+lib/perl5/man/man3/Fcntl.3.gz
+lib/perl5/man/man3/FileHandle.3.gz
+lib/perl5/man/man3/NDBM_File.3.gz
+lib/perl5/man/man3/POSIX.3.gz
+lib/perl5/man/man3/SDBM_File.3.gz
+lib/perl5/man/man3/Safe.3.gz
+lib/perl5/man/man3/Socket.3.gz
+man/man1/jperl.1.gz
+man/man1/perlbot.1.gz
+man/man1/perldata.1.gz
+man/man1/perldebug.1.gz
+man/man1/perlsub.1.gz
+man/man1/perldiag.1.gz
+man/man1/perlembed.1.gz
+man/man1/perldsc.1
+man/man1/perlfunc.1.gz
+man/man1/perlguts.1.gz
+man/man1/perlipc.1.gz
+man/man1/perllol.1.gz
+man/man1/perlmod.1.gz
+man/man1/perlop.1.gz
+man/man1/perlovl.1.gz
+man/man1/perlpod.1.gz
+man/man1/perlre.1.gz
+man/man1/perlref.1.gz
+man/man1/perlrun.1.gz
+man/man1/perlsec.1.gz
+man/man1/perlvar.1.gz
+man/man1/perltie.1.gz
+man/man1/perltoc.1.gz
+man/man1/perltrap.1.gz
+man/man1/a2p.1.gz
+man/man1/perlxs.1.gz
+man/man1/s2p.1.gz
+man/man1/perl.1.gz
+man/man1/perlbook.1.gz
+man/man1/perlcall.1.gz
+man/man1/perlform.1.gz
+man/man1/perlobj.1.gz
+man/man1/perlstyle.1.gz
+man/man1/perlsyn.1.gz
+man/man1/perlxstut.1.gz