diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-12-12 11:07:27 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-12-12 11:07:27 +0000 |
| commit | eddad28d0244a5ea78db12a5ffa9cd57f0949857 (patch) | |
| tree | 05ad44e78e9f890dde830cbfda55cf72652376e4 /utils/perlivp.PL | |
| parent | 5bd7e777abc05b6a5df0dcabdb989e2f8f19d138 (diff) | |
| download | perl-eddad28d0244a5ea78db12a5ffa9cd57f0949857.tar.gz | |
Skip IO::Compress::Zlib in perlivp, since that's a distribution name,
not a proper module name.
p4raw-id: //depot/perl@29529
Diffstat (limited to 'utils/perlivp.PL')
| -rw-r--r-- | utils/perlivp.PL | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/utils/perlivp.PL b/utils/perlivp.PL index 2e597c28f4..01c5169523 100644 --- a/utils/perlivp.PL +++ b/utils/perlivp.PL @@ -33,13 +33,12 @@ $Config{'startperl'} if \$running_under_some_shell; !GROK!THIS! +print OUT "\n# perlivp $^V\n"; + # In the following, perl variables are not expanded during extraction. print OUT <<'!NO!SUBS!'; -# perlivp V 0.02 - - sub usage { warn "@_\n" if @_; print << " EOUSAGE"; @@ -209,7 +208,9 @@ if (defined($Config{'extensions'})) { next if ($_ eq 'threads'); next if ($_ eq 'threads/shared'); } - next if ($_ eq 'Devel/DProf'); + # that's a distribution name, not a module name + next if $_ eq 'IO/Compress/Zlib'; + next if $_ eq 'Devel/DProf'; # VMS$ perl -e "eval ""require \""Devel/DProf.pm\"";"" print $@" # \NT> perl -e "eval \"require 'Devel/DProf.pm'\"; print $@" # DProf: run perl with -d to use DProf. |