Solaris-Lgrp
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
bin/lgrpinfo view on Meta::CPAN
$rsrc = $rsrc_prefix . $rsrc;
my $rsrc_cpu = lgrp_collapse(@resources_cpu);
my $rsrc_mem = lgrp_collapse(@resources_mem);
my $lcpu = gettext("CPU");
my $lmemory = gettext("memory");
$rsrc = "$rsrc $rsrc_cpu ($lcpu);" if scalar @resources_cpu;
$rsrc = "$rsrc $rsrc_mem ($lmemory)" if scalar @resources_mem;
return ($rsrc);
}
# Consolidate consequtive ids as start-end
sub lgrp_collapse
{
return "" unless @_;
my @args = uniqsort(@_);
my $start = shift(@args);
my $end = $start;
my $result = "";
foreach my $el (@args) {
if ($el == ($end + 1)) {
$end = $el;
view all matches for this distributionview release on metacpan - search on metacpan
( run in 0.876 second using v1.00-cache-2.02-grep-82fe00e-cpan-503542c4f10 )