Michael Scwhern wrote:

> We've just redone the manifypods system in the Unix parts of MakeMaker and
> I'm trying to figure out if I can get rid of the VMS part as well.  As far
> as I can see the only thing really being done different in
> ExtUtils::MM_VMS::manifypods is this:

>   foreach $pod (sort keys %{$self->{MAN1PODS}}) {
>     push @m, qq[\t\@- If F\$Search("\$(POD2MAN_EXE)").nes."" Then \$(POD2MAN) ];
>     push @m, "$pod $self->{MAN1PODS}{$pod}\n";
>   }

> that little DCL command doing something with POD2MAN_EXE.  If I'm reading it
> correctly (and I'm probably not) this:

>     if F$Search("$(POD2MAN_EXE)").nes."" Then $(POD2MAN)

> is something like "if $(POD2MAN_EXE) exists, use $(POD2MAN)"

You're reading it right.  F$SEARCH is the DCL lexical function that takes a
filespec (possibly including wildcards) and returns an empty string if it
doesn't find any matches.  (If you're looking for everything that matches the
string, you call it over and over until you get an empty string.)


> This logic shouldn't be necessary anymore since with this patch
> http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2002-03/msg02345.html
> VMS's $(POD2MAN) no longer uses the pod2man executable.

I'll take your word for that part.

> Am I right?

Sounds like it.

-- Alan

===============================================================================
 Alan Winston --- [EMAIL PROTECTED]
 Disclaimer: I speak only for myself, not SLAC or SSRL   Phone:  650/926-3056
 Paper mail to: SSRL -- SLAC BIN 99, 2575 Sand Hill Rd, Menlo Park CA   94025
===============================================================================

Reply via email to