diff --git a/textproc/docx2txt/Makefile b/textproc/docx2txt/Makefile
new file mode 100644
index 00000000000..1024c8239b7
--- /dev/null
+++ b/textproc/docx2txt/Makefile
@@ -0,0 +1,25 @@
+# $OpenBSD: Makefile,v 1.1.1.1 2011/04/05 15:09:50 schwarze Exp $
+
+COMMENT =		command line converter from Microsoft docx to ASCII text
+DISTNAME =		docx2txt-1.0
+CATEGORIES =		textproc
+HOMEPAGE =		http://docx2txt.sourceforge.net/
+MAINTAINER =		Ingo Schwarze <schwarze@openbsd.org>
+
+# GPLv3+
+PERMIT_PACKAGE_CDROM =	Yes
+PERMIT_PACKAGE_FTP =	Yes
+PERMIT_DISTFILES_CDROM =Yes
+PERMIT_DISTFILES_FTP =	Yes
+
+MASTER_SITES =		${MASTER_SITE_SOURCEFORGE:=docx2txt/}
+EXTRACT_SUFX =		.tgz
+
+RUN_DEPENDS = 		archivers/unzip
+NO_BUILD =		Yes
+NO_REGRESS =		Yes
+
+do-install:
+	${INSTALL_SCRIPT} ${WRKSRC}/docx2txt.pl ${PREFIX}/bin/docx2txt
+
+.include <bsd.port.mk>
diff --git a/textproc/docx2txt/distinfo b/textproc/docx2txt/distinfo
new file mode 100644
index 00000000000..9a926587a05
--- /dev/null
+++ b/textproc/docx2txt/distinfo
@@ -0,0 +1,5 @@
+MD5 (docx2txt-1.0.tgz) = ei00BMRFttLSTWK/X8aBFg==
+RMD160 (docx2txt-1.0.tgz) = /ndDsNX9KpxjlPaUricVkebDvf0=
+SHA1 (docx2txt-1.0.tgz) = EJ7GWXaQiXecNSyyionPQAhAeRw=
+SHA256 (docx2txt-1.0.tgz) = 9I9pc2+nMFnZ3eHy9RjJr/qBdFFfEG3bOdakXi+iM9s=
+SIZE (docx2txt-1.0.tgz) = 24795
diff --git a/textproc/docx2txt/patches/patch-docx2txt_pl b/textproc/docx2txt/patches/patch-docx2txt_pl
new file mode 100644
index 00000000000..dd7702ebbe0
--- /dev/null
+++ b/textproc/docx2txt/patches/patch-docx2txt_pl
@@ -0,0 +1,12 @@
+$OpenBSD: patch-docx2txt_pl,v 1.1.1.1 2011/04/05 15:09:50 schwarze Exp $
+--- docx2txt.pl.orig	Sun Oct  4 17:31:04 2009
++++ docx2txt.pl	Tue Apr  5 16:07:08 2011
+@@ -72,7 +72,7 @@
+ # first in current directory and then in the same location as this script.
+ #
+ 
+-our $unzip = '/usr/bin/unzip';	# Windows path like 'C:/path/to/unzip.exe'
++our $unzip = 'unzip';		# rely on the PATH
+ our $newLine = "\n";		# Alternative is "\r\n".
+ our $listIndent = "  ";		# Indent nested lists by "\t", " " etc.
+ our $lineWidth = 80;		# Line width, used for short line justification.
diff --git a/textproc/docx2txt/pkg/DESCR b/textproc/docx2txt/pkg/DESCR
new file mode 100644
index 00000000000..c1a5aa984e1
--- /dev/null
+++ b/textproc/docx2txt/pkg/DESCR
@@ -0,0 +1,5 @@
+Docx2txt is a Perl based command-line tool to convert Microsoft docx
+documents to (ASCII) text files, preserving some formatting and document
+information (which MS text conversion drops) along with appropriate
+character conversions.  It can also recover text from damaged docx
+documents in many cases.
diff --git a/textproc/docx2txt/pkg/PLIST b/textproc/docx2txt/pkg/PLIST
new file mode 100644
index 00000000000..ace21a4a425
--- /dev/null
+++ b/textproc/docx2txt/pkg/PLIST
@@ -0,0 +1,2 @@
+@comment $OpenBSD: PLIST,v 1.1.1.1 2011/04/05 15:09:50 schwarze Exp $
+bin/docx2txt