Re: File::Find problem on windows+apache+activePerl

"Koolrans" <koolrans@xxxxxxxxx> wrote in
news:1141074727.590395.210460@xxxxxxxxxxxxxxxxxxxxxxxxxxxx:

Thanks for the reply. I did try the FAQ.

Who are you thanking? What reply? What FAQ?


My bad. Being my first time, I used reply instead of options->reply.
So the reply only made it to the author.

Please do not snip attributions. Please trim the post appropriately.

Are you checking all your file I/O operations for errors? Are you
dying on errors? Are you including the operating system's last error
variable ($!) in those die messages?

It's time for you to show some code.

That would have been an excellent thing to do the first time you posted.

Here is how I use the function.

use strict;
use warnings;

missing.

@src_dir = "\\\\testnetwork\\filesToBeUploaded\\linux"

use File::Spec::Functions qw( catfile );

my $src_dir = catfile qw( \\\\Aardvark filestobeuploaded linux );

print "@src_dir";

It is an error to output anything in a CGI script before headers are sent.

find(\&processFiles, "@src_dir")

find(\&processFiles, $src_dir)

[Mon Feb 27 13:06:02 2006] [error] [client 10.2.20.109] Can't stat
\\\\testnetwork\\filesToBeUploaded\\linux: No such file or directory,

That's weird when I run your code, the error I get is:

D:\Home\asu1\UseNet\clpmisc> r
Can't stat \\testnetwork\filesToBeUploaded\linux: ...

How can there be four slashes above? There must be some relevant code you
are not showing us.

Please come up with a short and complete script others can run.

Now, to be able to run the following script on my local network, I had to
not only create the appropriate share, but also poke a hole through the
Symantec Firewall. So, it looks like your issue does not have much to do
with Perl, but with the configuration of your OS, web server, firewall
etc.

#!/usr/bin/perl

use warnings;
use strict;

use File::Find;
use File::Spec::Functions qw( catfile );

my $src = catfile qw(\\\\Aardvark vim);

find(\&process_files, $src);

sub process_files {
print;
}

__END__

Paul Lalli wrote:
Koolrans wrote:


The posting guidelines explain how to use an effective quoting style.

--
A. Sinan Unur <1usa@xxxxxxxxxxxxxxxxxxx>
(reverse each component and remove .invalid for email address)

comp.lang.perl.misc guidelines on the WWW:
http://mail.augustmail.com/~tadmc/clpmisc/clpmisc_guidelines.html
.

Relevant Pages

  • Re: Loop within (InStr) Loop problem - how do I re-read file in second loop?
    ... On your first time through first time through your ODAS Sub you 'Set' ... the first parameter 'objTextFile2' which at this point is an object and not ... > to have a problem with the script not re-reading the second file. ...
    (microsoft.public.scripting.vbscript)
  • Re: free source for bbs
    ... > did it the first time, fixed that, and I know how they did it the ... > second time because my password for the admin script was something ... But we are not laughing with you. ...
    (comp.lang.perl.misc)
  • Re: [kde-linux] Starting ssh at log-in
    ... convenient as possible without losing that security. ... First, if you use password caching anyway, it is only the first time you are ... previous post that your konsole flicks on the screen and then exits. ... script to run rather than a shell. ...
    (KDE)
  • Re: Support Groups
    ... I missed this the first time I read your post. ... I understood he needed to go through a script. ... fan had failed and the script discovered it was the fan on the video card ... Go with the Small Business Group. ...
    (alt.sys.pc-clone.dell)
  • Re: The End
    ... For the first time, my life didn't erupt ... my script today, by first class post. ... the BBC's New Writing Co-coordinator tomorrow or Thursday, ... a second reading. ...
    (misc.writing)