diff --git a/devel/p5-Universal-can/Makefile b/devel/p5-Universal-can/Makefile
new file mode 100644
index 00000000000..7c2df53a276
--- /dev/null
+++ b/devel/p5-Universal-can/Makefile
@@ -0,0 +1,21 @@
+# $OpenBSD: Makefile,v 1.1.1.1 2006/11/04 15:19:38 espie Exp $
+
+COMMENT=	"calling UNIVERSAL::can as a function"
+
+DISTNAME=	UNIVERSAL-can-1.12
+PKGNAME=	p5-Universal-can-1.12
+CATEGORIES=	devel perl5
+
+# Same as Perl
+PERMIT_PACKAGE_CDROM=	Yes
+PERMIT_PACKAGE_FTP=	Yes
+PERMIT_DISTFILES_CDROM=	Yes
+PERMIT_DISTFILES_FTP=	Yes
+
+MASTER_SITES=	${MASTER_SITE_PERL_CPAN:=UNIVERSAL/}
+
+CONFIGURE_STYLE=perl build
+
+PKG_ARCH=	*
+
+.include <bsd.port.mk>
diff --git a/devel/p5-Universal-can/distinfo b/devel/p5-Universal-can/distinfo
new file mode 100644
index 00000000000..00aa5db9f9b
--- /dev/null
+++ b/devel/p5-Universal-can/distinfo
@@ -0,0 +1,4 @@
+MD5 (UNIVERSAL-can-1.12.tar.gz) = 4386c4f7479447fc5b51e8c3770cd2f4
+RMD160 (UNIVERSAL-can-1.12.tar.gz) = b41cefef85157630a9dbbf7db63afd8802511dc7
+SHA1 (UNIVERSAL-can-1.12.tar.gz) = bd59fca2f15a826423eb2acf3b04d30ec9fbc0ea
+SIZE (UNIVERSAL-can-1.12.tar.gz) = 8230
diff --git a/devel/p5-Universal-can/pkg/DESCR b/devel/p5-Universal-can/pkg/DESCR
new file mode 100644
index 00000000000..80a1c7cf15f
--- /dev/null
+++ b/devel/p5-Universal-can/pkg/DESCR
@@ -0,0 +1,2 @@
+This module attempts to work around people calling UNIVERSAL::can() as a
+function, which it is not.
diff --git a/devel/p5-Universal-can/pkg/PLIST b/devel/p5-Universal-can/pkg/PLIST
new file mode 100644
index 00000000000..f678685cfaf
--- /dev/null
+++ b/devel/p5-Universal-can/pkg/PLIST
@@ -0,0 +1,4 @@
+@comment $OpenBSD: PLIST,v 1.1.1.1 2006/11/04 15:19:38 espie Exp $
+${P5SITE}/UNIVERSAL/
+${P5SITE}/UNIVERSAL/can.pm
+@man man/man3p/UNIVERSAL::can.3p