![]() |
|
Just another Perl shrine | |
PerlMonks |
Open files per process via lsofby grinder (Bishop) |
on May 05, 2004 at 13:33 UTC ( #350764=snippet: print w/replies, xml ) | Need Help?? |
lsof | perl -lane '$x{"$F[0]:$F[1]"}++; END { print "$x{$_}\t$_" for sort {$x{$a}<=>$x{$b}} keys %x}'
|
|