Some interesting points raised - thanks! I benchmarked the 'lsof -Pn -c $processname' against the 'lsof -c $processname' that I was using - and surprisingly enough, they seem to be dead even (more or less). I would have thought that using '-Pn' would give a little speed boost - though perhaps it has something to do with our server configuration (little interaction with other servers, etc).
Also - thanks for the info about the Fields argument, not to mention the great sample script! I'll definitely be playing with that a bit over the next few days.
Just for the heck of it, here's the code (and results) of the 'lsof -Pn' comparison:
#!/usr/bin/perl -w
use Benchmark qw(:all);
use strict;
my $process = "processX";
my $lsofcmd1 = "/usr/local/bin/lsof -Pn -c $process|wc -l";
my $lsofcmd2 = "/usr/local/bin/lsof -c $process|wc -l";
my $count = 1000;
my $results = timethese($count,
{
'lsof_Pn_c' => sub { system($lsofcmd1);},
'lsof_c' => sub { system($lsofcmd2); },
},
'none'
);
print ("\n\n");
cmpthese( $results ) ;
### Results (ran it several times and got similar numbers) ###
# Rate lsof_Pn_c lsof_c
# lsof_Pn_c 370/s -- -0%
# lsof_c 372/s 0% --
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.