Munin contributed plugins

        my $threads = get_thread_list();

        my %counts = ();

        my ($thread, $user, $count);

        while (($thread, $user) = each %$threads) {

            $counts{$user} = 0 unless defined($counts{$user});

        }

        sub valsort {

        }

}

sub poll_variables {

	my $command = shift;

	my $expression = shift;