From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: 03 October 2005 19:51
To: Brian Raven
Cc: [email protected];
[EMAIL PROTECTED]
Subject: RE: Returning remote directory information
Brian,
Please review comments below
Regards/Thanks
Chris McEwen
Sr. Configuration Management Analyst
Alcatel Canada Inc.
Office: 416.748.4424 ext 5015
mailto: [EMAIL PROTECTED]
"Brian Raven" <[EMAIL PROTECTED]>
Sent by: [EMAIL PROTECTED]
10/03/2005 12:29 PM
To
<[email protected]>
cc
Subject
RE: Returning remote directory information
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: 03 October 2005 16:01
To: [EMAIL PROTECTED];
[email protected]
Subject: Returning remote directory information
> Morning,
Evening :-)
> I am trying to create a function that would log into to a remote
server and return the directory size. Is > > > there an existing
package that can be downloaded which will return the size of a remote
directory?
This is one of those "it depends what you mean" questions, i.e. you
haven't really given us enough information.
What do you mean by "directory size"? Number of files, number of bytes
in files, number of disk blocks, something else, also are
sub-directories to be included? Also how some of these are determined
can be platform specific.
CM> What I need to do is check to see if the directory is empty, and do
some processing based on the return value
How can you access the remote server to get this information? FTP,
Telnet, SSH, something else?
CM> I can access the remote server using the psexec command
(sysinternals)
I don't have psexec, but a quick google told me enough to suggest the
following (untested, obviously).
sub how_many_files {
my ($machine, $directory) = @_;
my @files = `psexec \\\\$machine -w $directory DIR /B`;
return scalar(@files)
}
You may have to supply username and password as well.
HTH
--
Brian Raven
=================================
Atos Euronext Market Solutions Disclaimer
=================================
The information contained in this e-mail is confidential and solely for the
intended addressee(s). Unauthorised reproduction, disclosure, modification,
and/or distribution of this email may be unlawful.
If you have received this email in error, please notify the sender immediately
and delete it from your system. The views expressed in this message do not
necessarily reflect those of Atos Euronext Market Solutions.
L'information contenue dans cet e-mail est confidentielle et uniquement
destinee a la (aux) personnes a laquelle (auxquelle(s)) elle est adressee.
Toute copie, publication ou diffusion de cet email est interdite. Si cet e-mail
vous parvient par erreur, nous vous prions de bien vouloir prevenir
l'expediteur immediatement et d'effacer le e-mail et annexes jointes de votre
systeme. Le contenu de ce message electronique ne represente pas necessairement
la position ou le point de vue d'Atos Euronext Market Solutions.
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
