Index: head/devel/p5-Data-Peek/Makefile
===================================================================
--- head/devel/p5-Data-Peek/Makefile	(revision 446678)
+++ head/devel/p5-Data-Peek/Makefile	(revision 446679)
@@ -1,24 +1,24 @@
 # Created by: Wen Heping <wen@FreeBSD.org>
 # $FreeBSD$
 
 PORTNAME=	Data-Peek
-PORTVERSION=	0.46
+PORTVERSION=	0.47
 CATEGORIES=	devel perl5
 MASTER_SITES=	CPAN
 PKGNAMEPREFIX=	p5-
 
 MAINTAINER=	perl@FreeBSD.org
 COMMENT=	Collection of low-level debug facilities
 
 LICENSE=	ART10 GPLv1
 LICENSE_COMB=	dual
 
 TEST_DEPENDS=	p5-Test-NoWarnings>=0:devel/p5-Test-NoWarnings
 
 USES=		perl5 tar:tgz
 USE_PERL5=	configure
 
 post-install:
 	${STRIP_CMD} ${STAGEDIR}${PREFIX}/${SITE_ARCH_REL}/auto/Data/Peek/Peek.so
 
 .include <bsd.port.mk>
Index: head/devel/p5-Data-Peek/distinfo
===================================================================
--- head/devel/p5-Data-Peek/distinfo	(revision 446678)
+++ head/devel/p5-Data-Peek/distinfo	(revision 446679)
@@ -1,2 +1,3 @@
-SHA256 (Data-Peek-0.46.tgz) = e3d276e798e7eb042b190aea869b38ba4f7c56ec4a4c90d0dcf10bd155c1b773
-SIZE (Data-Peek-0.46.tgz) = 60796
+TIMESTAMP = 1501085743
+SHA256 (Data-Peek-0.47.tgz) = c70d52e04f502fc8a6c1aba11b3c8c6d142c8691c18ddeb2c8c92259a0b13b30
+SIZE (Data-Peek-0.47.tgz) = 67100
Index: head/devel/p5-Data-Peek/files/patch-Makefile.PL
===================================================================
--- head/devel/p5-Data-Peek/files/patch-Makefile.PL	(revision 446678)
+++ head/devel/p5-Data-Peek/files/patch-Makefile.PL	(revision 446679)
@@ -1,14 +1,14 @@
---- ./Makefile.PL.orig	2014-01-01 12:53:34.000000000 +0100
-+++ ./Makefile.PL	2014-08-09 13:50:03.000000000 +0200
-@@ -33,9 +33,9 @@
+--- Makefile.PL.orig	2017-07-24 11:59:06 UTC
++++ Makefile.PL
+@@ -33,9 +33,9 @@ my %wm = (
  $ExtUtils::MakeMaker::VERSION > 6.30 and $wm{LICENSE} = "perl";
  
  unless (exists $ENV{AUTOMATED_TESTING} and $ENV{AUTOMATED_TESTING} == 1) {
 -    if (prompt ("Do you want to install module DP as a shortcut for Data::Peek ?", "y") =~ m/[yY]/) {
 +    {
  	local $/;
 -	open my $pm, "<", "Peek.pm" or die "CAnnot read Peek.pm: $!\n";
 +	open my $pm, "<", "Peek.pm" or die "Cannot read Peek.pm: $!\n";
  	my $vsn = do { <$pm> =~ m/^\$VERSION\s*=\s*"([0-9._]+)/m; $1 };
  	close   $pm;