Thank You Everyone,
I think now that I know I can use $ftp->ls( "-lR" ), which I couldn't
find
anywhere in the Net::FTP docs or other O'Reilly books I have, I can
stick to Net::FTP without is being slow. What was causing my script
to take so long was the multiple $ftp->cwd( $directory ), $ftp-
On Monday 01 August 2005 23:12, Boysenberry Payne wrote:
> Hello All,
>
> I've got a two server platform one a static server for files and runs
> the mysql server
> and the other runs mod_perl. I'm trying to figure out the fastest way
> to get info on directories
> and files from the static
> From: Philip M. Gollucci [mailto:[EMAIL PROTECTED]
> I didn't write this, but ...[it]... makes us millions.
I trust "you" are putting thousands into perl, mod_perl and other good
things, then ;)
Boysenberry Payne wrote:
my $h = $ftp->{handle};
foreach my $directory ( @directories ) {
$h->cwd( $directory ) or die "can't change to directory: $directory
$!";
my $dir_ls = $h->ls;
foreach my $file_name ( @$dir_ls ) {
unless ( substr( $file_name, 0, 1 ) eq "." ) {
$ftp->{handle} = Net::FTP->new( $ftp->{host}, Passive => 1 ) or die
"Can't create new ftp with host: $ftp->{host}";
It's part of my FTP module
Thanks,
Boysenberry
This message contains information that is confidential
and proprietary to Humaniteque and / or its affiliates.
It is intended only
On Mon, 1 Aug 2005, Boysenberry Payne wrote:
I'm not sure if HEAD would work.
Basically, I'm trying to read a directory's files.
After I confirm a file exists and doesn't have zero
size I check that it has the appropriate extension
for the directory then I add the directory address,
file name an
I've already got it working using Net::FTP. The problem is it runs
slow using FTP. Here is an example of what I'm trying to do:
my $h = $ftp->{handle};
foreach my $directory ( @directories ) {
$h->cwd( $directory ) or die "can't change to directory: $directory
$!";
my $dir_ls = $h->l
Boysenberry Payne wrote:
I'm not sure if HEAD would work.
Basically, I'm trying to read a directory's files.
After I confirm a file exists and doesn't have zero
size I check that it has the appropriate extension
for the directory then I add the directory address,
file name and extension to a tabl
I'm not sure if HEAD would work.
Basically, I'm trying to read a directory's files.
After I confirm a file exists and doesn't have zero
size I check that it has the appropriate extension
for the directory then I add the directory address,
file name and extension to a table in our database.
It use
Boysenberry Payne wrote:
The server system is hosted with a third party, so I was hoping I could use
mod_perl as a solution without resorting to involving them in the
solution if
possible. If NFS ends up being the best solution I will ask them
if they could set it up.
Specifically what inform
The server system is hosted with a third party, so I was hoping I could
use
mod_perl as a solution without resorting to involving them in the
solution if
possible. If NFS ends up being the best solution I will ask them
if they could set it up.
Thanks,
Boysenberry
This message contains informa
Boysenberry Payne wrote:
> Hello All,
>
> I've got a two server platform one a static server for files and
> runs the mysql server
> and the other runs mod_perl. I'm trying to figure out the fastest way
> to get info on directories
> and files from the static server to the mod_perl server. R
Gedanken wrote:
One quick caveat - properly unmount volumes when rebooting and such. Due
to one of those things that somehow grew beyond its original intent, we
had a network of about 15 machines all mounting each other. NFS
chokes when a mount it expects to be there, isnt. it takes it sever
On Mon, 1 Aug 2005, Philip M. Gollucci wrote:
There is a running joke in my office that, no matter what the problem is,
I simply blame NFS before hearing any details. I am correct a surprising
amount of the time =)
One quick caveat - properly unmount volumes when rebooting and such. Due
to o
Boysenberry Payne wrote:
Hello All,
I've got a two server platform one a static server for files and
runs the mysql server
and the other runs mod_perl. I'm trying to figure out the fastest way
to get info on directories
and files from the static server to the mod_perl server. Right now I
15 matches
Mail list logo
