Index: head/devel/p5-UNIVERSAL-ref/Makefile
===================================================================
--- head/devel/p5-UNIVERSAL-ref/Makefile	(revision 479392)
+++ head/devel/p5-UNIVERSAL-ref/Makefile	(revision 479393)
@@ -1,26 +1,26 @@
 # $FreeBSD$
 
 PORTNAME=	UNIVERSAL-ref
 PORTVERSION=	0.14
 PORTREVISION=	1
 CATEGORIES=	devel perl5
 MASTER_SITES=	CPAN
 MASTER_SITE_SUBDIR=	CPAN:JJORE
 PKGNAMEPREFIX=	p5-
 
 MAINTAINER=	perl@FreeBSD.org
 COMMENT=	Turns ref() into a multimethod
 
 BUILD_DEPENDS=	p5-B-Utils>=0:devel/p5-B-Utils
 RUN_DEPENDS:=	${BUILD_DEPENDS}
 
 USES=		perl5
 USE_PERL5=	configure
 
 .include <bsd.port.pre.mk>
 
 .if ${PERL_LEVEL} >= 502501
-BROKEN=		Does not build, op_sibling usage. https://rt.cpan.org/Public/Bug/Display.html?id=118008
+EXTRA_PATCHES=	${PATCHDIR}/extra-patch-ref.xs
 .endif
 
 .include <bsd.port.post.mk>
Index: head/devel/p5-UNIVERSAL-ref/files/extra-patch-ref.xs
===================================================================
--- head/devel/p5-UNIVERSAL-ref/files/extra-patch-ref.xs	(nonexistent)
+++ head/devel/p5-UNIVERSAL-ref/files/extra-patch-ref.xs	(revision 479393)
@@ -0,0 +1,19 @@
+Patch for Perl 0.25 and newer, where op_sibling has been replaced with
+op_sibparent which points to a sibling if the op has one and its parent
+otherwise.  See <https://rt.cpan.org/Public/Bug/Display.html?id=118008>.
+
+--- ref.xs.orig	2011-01-23 19:17:15 UTC
++++ ref.xs
+@@ -89,9 +89,9 @@ void universal_ref_fixupop( OP* o ) {
+     universal_ref_fixupop(cUNOPx(o)->op_first);
+   }
+ 
+-  if ( o->op_sibling ) {
+-    UNIVERSAL_REF_DEBUG(printf("# ->sibling=%x\n",o->op_sibling));
+-    universal_ref_fixupop(o->op_sibling);
++  if ( OpHAS_SIBLING(o) ) {
++    UNIVERSAL_REF_DEBUG(printf("# ->sibling=%x\n",OpSIBLING(o)));
++    universal_ref_fixupop(OpSIBLING(o));
+   }
+ }
+ 

Property changes on: head/devel/p5-UNIVERSAL-ref/files/extra-patch-ref.xs
___________________________________________________________________
Added: fbsd:nokeywords
## -0,0 +1 ##
+yes
\ No newline at end of property
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: svn:mime-type
## -0,0 +1 ##
+text/plain
\ No newline at end of property