view release on metacpan or  search on metacpan

lib/BenchmarkAnything/Storage/Frontend/Lib.pm  view on Meta::CPAN

}


sub process_raw_result_queue
{
        my ($self, $count) = @_;

        require LockFile::Simple;

        my $lock;
        my $lockmgr = LockFile::Simple->make(-stale => 1, -autoclean => 1);

        return unless $lock = $lockmgr->trylock('/tmp/process_raw_result_queue');

        $count ||= 10;

        my $backend = $self->{config}{benchmarkanything}{backend};
        if ($backend eq 'local')
        {
                my @dequeued_raw_bench_bundle_ids;
                do {