summaryrefslogtreecommitdiff
path: root/utils
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-01-23 09:50:54 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-01-23 09:50:54 +0000
commit497714249e2a0fc7fe0b96726f037048f352080d (patch)
treef181bdab4fc88838f49dec4e9902c577eb3548af /utils
parentf5ad548981fabdd729c642abf0b7d298bf62131b (diff)
downloadperl-497714249e2a0fc7fe0b96726f037048f352080d.tar.gz
dprofpp can't find Devel::DProf::VERSION due to change#4852
p4raw-link: @4852 on //depot/perl: 117c97cc8bc4f8d1e649a798c680208c2e87c6d9 p4raw-id: //depot/perl@4856
Diffstat (limited to 'utils')
-rw-r--r--utils/dprofpp.PL4
1 files changed, 2 insertions, 2 deletions
diff --git a/utils/dprofpp.PL b/utils/dprofpp.PL
index ba099c0279..a6a1d911a5 100644
--- a/utils/dprofpp.PL
+++ b/utils/dprofpp.PL
@@ -22,7 +22,7 @@ my $dprof_pm = '../ext/Devel/DProf/DProf.pm';
my $VERSION = 0;
open( PM, "<$dprof_pm" ) || die "Can't open $dprof_pm: $!";
while(<PM>){
- if( /^\$Devel::DProf::VERSION\s*=\s*'(\d+)'/ ){
+ if( /^\$Devel::DProf::VERSION\s*=\s*'([\d._]+)'/ ){
$VERSION = $1;
last;
}
@@ -45,7 +45,7 @@ $Config{'startperl'}
require 5.003;
-my \$VERSION = $VERSION;
+my \$VERSION = '$VERSION';
!GROK!THIS!