#!/usr/bin/perl 
my $scriptname;
BEGIN {
    $scriptname = `basename $0`;
    chomp $scriptname;

    if (!$ENV{'PERL5LIB'} || !$ENV{'OPALS_CONF'} || !$ENV{'BG_JOBID'}) {
        exit 1;
    }
}


my $jobId =$ENV{'BG_JOBID'};
use strict;
use Opals::Context;
use DBI;
use Opals::BackgroundJobs qw(
    bgjob_process
);
open debug,">/tmp/t5";print debug   $ENV{'PERL5LIB'} ,$ENV{'OPALS_CONF'},$ENV{'BG_JOBID'};close debug;
my $dbh = Opals::Context->dbh();
END { $dbh->disconnect(); }
bgjob_process($dbh,$jobId);
exit 0;