my $obj = ObjectStuff->load(objid);
my $status = $obj->getStatus();

my @validStatus = split(',', $csv_of_active_status);

unless ( $status ~~ @validStatus ) {
  #spew warnings;
  exit;
}