diff --git a/devel/Makefile b/devel/Makefile
index a4dbdb0b3282..67ecc8924a66 100644
--- a/devel/Makefile
+++ b/devel/Makefile
@@ -808,6 +808,7 @@
     SUBDIR += p5-Parse-PerlConfig
     SUBDIR += p5-Parse-RecDescent
     SUBDIR += p5-Parse-Yapp
+    SUBDIR += p5-PatchReader
     SUBDIR += p5-Penguin
     SUBDIR += p5-Penguin-Easy
     SUBDIR += p5-PerlMenu
diff --git a/devel/p5-PatchReader/Makefile b/devel/p5-PatchReader/Makefile
new file mode 100644
index 000000000000..9a5d797b6fc6
--- /dev/null
+++ b/devel/p5-PatchReader/Makefile
@@ -0,0 +1,29 @@
+# New ports collection makefile for:	p5-PatchReader
+# Date created:				2004-02-11
+# Whom:					Toni Viemerö <toni.viemero@iki.fi>
+#
+# $FreeBSD$
+#
+
+PORTNAME=	PatchReader
+PORTVERSION=	0.9.2
+CATEGORIES=	devel perl5
+MASTER_SITES=${MASTER_SITE_PERL_CPAN}
+MASTER_SITE_SUBDIR=	../by-authors/id/J/JK/JKEISER
+PKGNAMEPREFIX=	p5-
+
+MAINTAINER=	ports@FreeBSD.org
+COMMENT=	Perl module with utilities to read and manipulate patches and CVS
+
+PERL_CONFIGURE=	yes
+
+MAN3=		PatchReader.3
+
+.include <bsd.port.pre.mk>
+
+.if ${PERL_LEVEL} < 500600
+BUILD_DEPENDS=	${SITE_PERL}/File/Temp.pm:${PORTSDIR}/devel/p5-File-Temp
+RUN_DEPENDS=	${BUILD_DEPENDS}
+.endif
+
+.include <bsd.port.post.mk>
diff --git a/devel/p5-PatchReader/distinfo b/devel/p5-PatchReader/distinfo
new file mode 100644
index 000000000000..5bf85ccba1d8
--- /dev/null
+++ b/devel/p5-PatchReader/distinfo
@@ -0,0 +1,2 @@
+MD5 (PatchReader-0.9.2.tar.gz) = c0d48aa7025426ac4da04edcccccd8b0
+SIZE (PatchReader-0.9.2.tar.gz) = 8586
diff --git a/devel/p5-PatchReader/pkg-descr b/devel/p5-PatchReader/pkg-descr
new file mode 100644
index 000000000000..e378f3ee78d4
--- /dev/null
+++ b/devel/p5-PatchReader/pkg-descr
@@ -0,0 +1,9 @@
+PatchReader is a set of utilities for reading in, transforming, and doing
+various other things with a patch.  It basically allows you to create a chain of
+readers that can read a patch, remove files from a patch, add CVS context, fix
+up the patch root according to CVS, and output the patch as raw unified or
+through a template processor (used in some places to output a patch as HTML).
+
+Author:	John Keiser <john@johnkeiser.com>
+
+WWW:	http://search.cpan.org/dist/PatchReader/
diff --git a/devel/p5-PatchReader/pkg-plist b/devel/p5-PatchReader/pkg-plist
new file mode 100644
index 000000000000..521f7e991e32
--- /dev/null
+++ b/devel/p5-PatchReader/pkg-plist
@@ -0,0 +1,15 @@
+%%SITE_PERL%%/PatchReader.pm
+%%SITE_PERL%%/PatchReader/NarrowPatch.pm
+%%SITE_PERL%%/PatchReader/FilterPatch.pm
+%%SITE_PERL%%/PatchReader/AddCVSContext.pm
+%%SITE_PERL%%/PatchReader/Base.pm
+%%SITE_PERL%%/PatchReader/Raw.pm
+%%SITE_PERL%%/PatchReader/FixPatchRoot.pm
+%%SITE_PERL%%/PatchReader/CVSClient.pm
+%%SITE_PERL%%/PatchReader/PatchInfoGrabber.pm
+%%SITE_PERL%%/PatchReader/DiffPrinter/template.pm
+%%SITE_PERL%%/PatchReader/DiffPrinter/raw.pm
+%%SITE_PERL%%/%%PERL_ARCH%%/auto/PatchReader/.packlist
+@unexec rmdir %D/%%SITE_PERL%%/%%PERL_ARCH%%/auto/PatchReader 2>/dev/null || true
+@dirrm %%SITE_PERL%%/PatchReader/DiffPrinter
+@unexec rmdir %D/%%SITE_PERL%%/PatchReader 2>/dev/null || true