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]



Reply via email to