Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!wuarchive!udel!haven!uvaarpa!mmdf
From: worley@compass.com (Dale Worley)
Newsgroups: comp.lang.perl
Subject: Bug(?) report
Message-ID: <1991Mar27.205437.28251@uvaarpa.Virginia.EDU>
Date: 27 Mar 91 20:54:37 GMT
Sender: mmdf@uvaarpa.Virginia.EDU (Uvaarpa Mail System)
Reply-To: worley@compass.com
Organization: The Internet
Lines: 29

I'm running Perl 3.44.  At line 885 in perly.c, there is the following
code:

	    tmpfilename = savestr(specfilename);
	    if (index("/.", *tmpfilename))
		rsfp = fopen(tmpfilename,"r");
	    else {
		ar = stab_array(incstab);
	        for (i = 0; i <= ar->ary_fill; i++) {
		[etc.]

This code is responsible for implementing the 'do' and 'require'
operators, in particular, looking up the correct file using the @INC
array.  The effect of the above 'if' is that if the argument to 'do'
or 'require' *contains* the substring '/.', then the searching in @INC
is suppressed.

This behavior is undocumented in The Book, and its purpose escapes me.
Since the file I'm trying to include is '../../src/ioctl.pl', it
screws me.  What is going on here?

Dale

Dale Worley		Compass, Inc.			worley@compass.com
--
The genius of you Americans is that you never make any clear-cut
stupid moves, only complicated stupid moves that leave us scratching
our heads wondering if we might possibly have missed something.
-- Gamel Abdel Nasser