Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

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.

Comment on Re: file size monitoring
Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1052156]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (4)
As of 2015-11-28 11:01 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (741 votes), past polls