On Monday, Nov 10, 2003, at 14:54 US/Pacific, James Edward Gray II wrote:
On Nov 10, 2003, at 4:47 PM, R. Joseph Newton wrote:
Look down the thread, and you will find correction from others, also. I can
tell you that I have generated tousands of files in folders reached by
relative paths, and all I have had to offer Perl was '/'s. It has been
working for some time, and quite handsomely.
Let me guess, on UNIX flavors, Windows, Mac OS X and/or Linux, right? All of these OSes understand '/'. This is no Perl magic. Again, they bundle the File::Spec modules for a reason, I would bet.
for fun, folks might want to do
perldoc -m File::Spec::Win32
and one will notice the Old Dog at the top of that module
package File::Spec::Win32;
use strict; use Cwd; use vars qw(@ISA); require File::Spec::Unix; @ISA = qw(File::Spec::Unix);
at which point there is the question about 'over-riding' those base set of methods.
Also if folks Peek into File::Spec we notice that it will be checking against '$^O' and/or using 'Unix' so if the version of perl one is using is NOT returning
my %module = (MacOS => 'Mac', MSWin32 => 'Win32', os2 => 'OS2', VMS => 'VMS');
then the File::Spec::Unix will be used directly. If one wants to check they can run the old scam:
[jeeves: 5:] perl -e 'print "my OS is $^O\n";' my OS is darwin [jeeves: 6:]
HTH.
ciao drieux
---
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]