Munin contributed plugins

	#find sitename

	$file=~s/$site/$1/;

	$file=$vhost if $vhost;

	# skip broken lines

	next unless $file;

	my $vpm=clean_fieldname("$file");

	$temp{$vpm}{'label'}="$file";

	$temp{$vpm}{'label'}=~s/www\.//;

	# count all requests

	$temp{$vpm}{'requests'}++;

         # average bytes

         $temp{$vpm}{'avg_bytes'}=$temp{$vpm}{'bytes'}/$temp{$vpm}{'requests'} || 0;

	}

	# count by status / error code

	$temp{$vpm}{"status"}{$status}++ if $status;

	if ($time) {

	  # microsec to millisec

  	  # min/max execution time

  	  $temp{$vpm}{'max_time'}=max($temp{$vpm}{'max_time'},$time) || 0;

        # tail files, calls &count with linearray

        $tail->read;

        $share->lock(LOCK_EX);

        # get data (may be updated by other loggers too)

        my %old=eval{%{thaw($share->fetch)}};              # using eval to suppress thaw error on empty string at the first run

        $share->store( freeze \%old );

        # end transaction

        $share->unlock;

        # parse/write every n seconds (plus processing time)

        sleep $nsec;

}