Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re: file size monitoring

by kennethk (Abbot)
on Sep 03, 2013 at 17:50 UTC ( #1052156=note: print w/replies, xml ) Need Help??

in reply to file size monitoring

What have you tried? What worked? What didn't? We're happy to help design and debug, but we won't do your work for you.

I'm not familiar with 'HP OVO product' and so don't know the necessary reporting formats, and didn't see any affiliated modules on CPAN. I also don't know what definition of megabyte you are using. I would expect -s will be useful, as will opendir and readdir. That chunk may look something like (untested):

my $dir = 'somewhere'; opendir my $dh, $dir or die $!; while (my $file = readdir $dh) { print "Too big: $file\n" if -s "$dir/$file" > 1024**2 }

You may also want to look at File::Find.

#11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1052156]
Not_a_Number adds chocolate chip cookies to the platter on the sideboard.

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (9)
As of 2017-04-26 15:56 GMT
Find Nodes?
    Voting Booth?
    I'm a fool:

    Results (484 votes). Check out past polls.