At 09:03 PM 12/15/2005 -0800, Suresh Govindachar wrote:
> >> 1) What does the following line do?
> >>
> >> eval 'exec C:\opt\perl\bin\perl.exe -S $0 ${1+"$@"}'
> >> if 0;
In perl it does nothing. Under bash it executes perl with itself as an
argument. Although my tests indicate that double backslashes (C:\\...) and
-x are required to make that trick work. So I'm not sure what they were
trying to accomplish with that. In unix, 0 is "true" and <> 0 is false. :)
The number represents the error level of the last exiting process. "No
error". Keep in mind that normally this line will *never* be executed.
Personally I think it's just left over development code that nobody deleted.
> >> use Pod::Perldoc;
> >> exit( Pod::Perldoc->run() );
> >
Go into the perldoc.pm file and check out the run subroutine. You should be
able to extract that code to do what u want.
--
REMEMBER THE WORLD TRADE CENTER ---=< WTC 911 >=--
"...ne cede malis"
00000100
_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
