I'm trying to write a script to search a bunch of machines, to find all .pst files and report back the machine name and , name of file and size of the file. I don't have a clue how to start, can someone help or point me in the right direction....Lamar
use File::Find;
use LWP::Simple;
open (LOG,">>log.file" || die "can't open log file $!";
find(sub{/\.pst$/ )},qw(C: D: E};
print LOG "$File::Find::name\n";
}
close log
use File::Find;
use LWP::Simple; {
open (LOG,">>log.file" || die "can't open log file $!";
find(sub{/\.pst$/},qw(C: D: E);
print LOG "$File::Find::name\n";
}
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.