diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-23 09:50:54 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-23 09:50:54 +0000 |
commit | 497714249e2a0fc7fe0b96726f037048f352080d (patch) | |
tree | f181bdab4fc88838f49dec4e9902c577eb3548af /utils | |
parent | f5ad548981fabdd729c642abf0b7d298bf62131b (diff) | |
download | perl-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.PL | 4 |
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! |