Was delighted to read the March 24 post regarding the problems someone was
having using relative paths in Windows 2000. I'm new to Perl and have been
put in charge of getting Perl scripts that worked under Unix to work again.
I've narrowed it down to this problem. My problem is these scripts are coded
using variables and subdirectories. I tried using one suggestion offered
here, but am afraid my attempt was abysmal. Please help.
Sample of original script:(where Library is a subdirectory to cgi-bin where
the current script resides)
&require_supporting_libraries (__FILE__, __LINE__,
"./Library/cgi-lib.pl",
"./Library/auth-lib.pl",
"./Library/db-lib.pl");
What I tried:
($CGIPath) = ($0 =~ m#^(.*\\)#);
&require_supporting_libraries (__FILE__, __LINE__,
$CGIPath . 'Library/cgi-lib.pl',
$CGIPath . 'Library/auth-lib.pl',
$CGIPath . 'Library/db-lib.pl');
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com
_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web
