Perl convenience wrapper for the rsync(1) program

PR:		ports/27484
Submitted by:	Pete Fritchman <petef@databits.net>

net/Makefile

@@ -231,6 +231,7 @@
     SUBDIR += p0f
     SUBDIR += p5-Archie
     SUBDIR += p5-Cflow
+    SUBDIR += p5-File-Rsync
     SUBDIR += p5-Frontier-RPC
     SUBDIR += p5-IO-Interface
     SUBDIR += p5-Mon

net/p5-File-Rsync/Makefile

@@ -0,0 +1,24 @@
+# New ports collection makefile for:	p5-File-Rsync
+# Date created:				20 May 2001
+# Whom:					petef@databits.net
+#
+# $FreeBSD$
+#
+
+PORTNAME=	File-Rsync
+PORTVERSION=	0.19
+CATEGORIES=	net perl5
+MASTER_SITES=	${MASTER_SITE_PERL_CPAN}
+MASTER_SITE_SUBDIR=	File
+PKGNAMEPREFIX=	p5-
+
+MAINTAINER=	petef@databits.net
+
+RUN_DEPENDS=	rsync:${PORTSDIR}/net/rsync
+
+PERL_CONFIGURE=	yes
+
+MANPREFIX=	${PREFIX}/lib/perl5/${PERL_VERSION}
+MAN3=		File::Rsync.3
+
+.include <bsd.port.mk>

net/p5-File-Rsync/distinfo

@@ -0,0 +1 @@
+MD5 (File-Rsync-0.19.tar.gz) = 7cbbc1388c2704d6d7041241b3f98917

net/p5-File-Rsync/files/patch-Makefile.PL

@@ -0,0 +1,11 @@
+--- Makefile.PL.orig	Sun May 20 10:30:46 2001
++++ Makefile.PL	Sun May 20 10:33:25 2001
+@@ -16,7 +16,7 @@
+       DISTNAME       => $DISTNAME,
+       AUTHOR         => $AUTHOR,
+       ABSTRACT       => $ABSTRACT,
+-      PL_FILES       => { 'makepm.PL' => 'Config.pm' },
++      PL_FILES       => { 'makepm.PL ${LOCALBASE}' => 'Config.pm' },
+       PM             => { 'Rsync.pm'  => '$(INST_LIB)/File/Rsync.pm',
+      			  'Config.pm' => '$(INST_ARCHLIB)/File/Rsync/Config.pm' },
+       dist           => { COMPRESS => 'gzip', SUFFIX => 'gz' },

net/p5-File-Rsync/files/patch-makepm.PL

@@ -0,0 +1,38 @@
+--- makepm.PL.orig	Sun May 20 10:23:34 2001
++++ makepm.PL	Sun May 20 10:30:05 2001
+@@ -1,32 +1,8 @@
+ # makepm.PL -- Builds Rsync.pm from Rsync.in.  -*- perl -*-
+-sub find_rsync {
+-   my @dirs = map { s/^$/./; $_ } split (':', $ENV{PATH});
+-   push (@dirs, qw(/usr/local/bin /usr/bin /opt/bin));
+-   for my $dir (@dirs) {
+-      next unless -d $dir;
+-      next unless -x "$dir/rsync";
+-      return "$dir/rsync";
+-   }
+-}
+ $|=1;
+-$RSYNC=&find_rsync;
+-print <<'EOT';
+-
+-File::Rsync needs to know the path to the rsync binary.  This path is encoded
+-in the installed module as the default path to rsync (it can be overridden
+-at runtime).  Please enter the full path to the rsync program or just hit
+-Enter if the guess is correct.  (If you always want the module to depend on
+-the $PATH environment variable at runtime, just set the path to 'rsync'
+-(this is not recommended)).
+-
+-EOT
+-$RSYNC||='/usr/local/bin/rsync';
+-print "Path to rsync [$RSYNC]: ";
+-my $ans=<STDIN>;
+-chomp $ans;
+-$RSYNC=$ans || $RSYNC;
+-$RSYNC=~s/\\/\\\\/g;
+-$RSYNC=~s/\'/\\\'/g;
++$PREFIX=@ARGV[0];
++$RSYNC=$PREFIX . "/rsync";
++print "Path to rsync [$RSYNC]";
+ open IN,'Config.in' or die "Cannot read Config.in: $!\n";
+ open OUT,'>Config.pm' or die "Cannot write Config.pm: $!\n";
+ while (<IN>) {

net/p5-File-Rsync/pkg-comment

@@ -0,0 +1 @@
+Perl convenience wrapper for the rsync(1) program

net/p5-File-Rsync/pkg-descr

@@ -0,0 +1,10 @@
+The File::Rsync Perl module is a convenience wrapper to the rsync(1)
+command.  It has wrappers for almost all the rsync commands and features,
+as well as detecting errors.
+
+For more details, type 'perldoc File::Rsync' or see the CPAN homepage:
+
+WWW: http://search.cpan.org/search?dist=File-Rsync
+
+- Pete 
+petef@databits.net

net/p5-File-Rsync/pkg-plist

@@ -0,0 +1,7 @@
+lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/File/Rsync.pm
+lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/File/Rsync/Config.pm
+lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/File/Rsync/.packlist
+@dirrm lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/File/Rsync
+@unexec rmdir %D/lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/File 2>/dev/null || true
+@dirrm lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/File/Rsync
+@unexec rmdir %D/lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/File 2>/dev/null || true