diff --git a/textproc/p5-XML-Smart/Makefile b/textproc/p5-XML-Smart/Makefile
new file mode 100644
index 00000000000..90ba5ec0164
--- /dev/null
+++ b/textproc/p5-XML-Smart/Makefile
@@ -0,0 +1,26 @@
+# $OpenBSD: Makefile,v 1.1.1.1 2005/07/23 07:53:43 aanriot Exp $
+
+COMMENT=	"Smart, easy and powerful way to access/create XML files/datas"
+
+DISTNAME=	XML-Smart-1.6.9
+PKGNAME=	p5-${DISTNAME}
+CATEGORIES=	textproc perl5
+
+MAINTAINER=	Okan Demirmen <okan@demirmen.com>
+
+# GPL/Artistic
+PERMIT_PACKAGE_CDROM=	Yes
+PERMIT_PACKAGE_FTP=	Yes
+PERMIT_DISTFILES_CDROM=	Yes
+PERMIT_DISTFILES_FTP=	Yes
+
+MASTER_SITES=	${MASTER_SITE_PERL_CPAN:=XML/}
+
+CONFIGURE_STYLE=perl
+
+BUILD_DEPENDS=	::textproc/p5-Object-MultiType
+RUN_DEPENDS=	${BUILD_DEPENDS}
+
+PKG_ARCH=	*
+
+.include <bsd.port.mk>
diff --git a/textproc/p5-XML-Smart/distinfo b/textproc/p5-XML-Smart/distinfo
new file mode 100644
index 00000000000..dec47236a9c
--- /dev/null
+++ b/textproc/p5-XML-Smart/distinfo
@@ -0,0 +1,4 @@
+MD5 (XML-Smart-1.6.9.tar.gz) = 648309c0d613ddaca6f6b16e9f13c81d
+RMD160 (XML-Smart-1.6.9.tar.gz) = 88f156ee1c8f1429b4b7bff3011a76af6042bcb5
+SHA1 (XML-Smart-1.6.9.tar.gz) = f79e97ab18d44296d530c824db370c2108648f87
+SIZE (XML-Smart-1.6.9.tar.gz) = 50195
diff --git a/textproc/p5-XML-Smart/pkg/DESCR b/textproc/p5-XML-Smart/pkg/DESCR
new file mode 100644
index 00000000000..82fb25fd66c
--- /dev/null
+++ b/textproc/p5-XML-Smart/pkg/DESCR
@@ -0,0 +1,14 @@
+HASH tree that is made of the XML data, and enables dynamic access to it
+with the Perl syntax for Hashes and Arrays, without needing to care if
+you have a Hash or an Array in the tree. In other words, each point in
+the tree work as a Hash and an Array at the same time!
+
+You also have extra resources, like a search for nodes by attribute,
+selection of an attribute value in each multiple node, change the
+returned format, etc...
+
+The module also handles automatically binary data (encoding/decoding
+to/from base64), CDATA (like contents with <tags>) and Unicode. It can
+be used to create XML files, load XML from the Web (just pasting an URL
+as a file path) and it has an easy way to send XML data through sockets,
+just adding the length of the data in the <?xml?> header.
diff --git a/textproc/p5-XML-Smart/pkg/PLIST b/textproc/p5-XML-Smart/pkg/PLIST
new file mode 100644
index 00000000000..b9dc5b2f41e
--- /dev/null
+++ b/textproc/p5-XML-Smart/pkg/PLIST
@@ -0,0 +1,21 @@
+@comment $OpenBSD: PLIST,v 1.1.1.1 2005/07/23 07:53:43 aanriot Exp $
+${P5SITE}/XML/
+${P5SITE}/XML/Smart/
+${P5SITE}/XML/Smart.pm
+${P5SITE}/XML/Smart/Base64.pm
+${P5SITE}/XML/Smart/DTD.pm
+${P5SITE}/XML/Smart/Data.pm
+${P5SITE}/XML/Smart/Entity.pm
+${P5SITE}/XML/Smart/FAQ.epod
+${P5SITE}/XML/Smart/FAQ.pod
+${P5SITE}/XML/Smart/HTMLParser.pm
+${P5SITE}/XML/Smart/Parser.pm
+${P5SITE}/XML/Smart/Tie.pm
+${P5SITE}/XML/Smart/Tree.pm
+${P5SITE}/XML/Smart/Tutorial.epod
+${P5SITE}/XML/Smart/Tutorial.pod
+${P5SITE}/XML/Smart/XPath.pm
+@man man/man3p/XML::Smart.3p
+@man man/man3p/XML::Smart::DTD.3p
+@man man/man3p/XML::Smart::FAQ.3p
+@man man/man3p/XML::Smart::Tutorial.3p