>I am trying to writ a script that would search a system for certain file >sizes and if so e-mail me. check out File::Find on cpan. You can do something like... use File::Find; sub checkSize { push @files, $_ if (-s == $specialSize); } find (\&checkSize, @dirs); if (defined @files) { mailMe (@files) } Peter C.
- serching system for certain file sizes then e-mail. Chris Bourne
- Peter Cornelius