Thanks, Rob, for your note. I tried this:
[EMAIL PROTECTED]:~/RapheTask$ perl t
/cdrom
/cdrom/JPEG Covers
/cdrom/PDF Docs
[EMAIL PROTECTED]:~/RapheTask$ cat t
use strict;
use warnings;
use File::Find;
find (sub{ print "$File::Find::name\n" }, '/cdrom/' );
[EMAIL PROTECTED]:~/RapheTask$
I think the failure is due to the different ways spaces in file names are treated in
Windows vs. Unix. In Window's, they're allowed, in Unix, a space is a delimiter
between files in a list.
Thanks, again, for your suggestion.
-Kevin
>>> Rob Dixon <[EMAIL PROTECTED]> 07/25/03 02:44PM >>>
Hi Kevin.
I believe this should work find as long as the code is as you say it is. Try
just:
use strict;
use warnings;
use File::Find;
find (sub{ print "$File::Find::name\n" }, '/full/path/to/cdrom' );
which works fine on my Windows XP machine, both bare and running Cygwin.
HTH,
Rob
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]