#!/usr/local/bin/perl -w
use strict;
use Time::Local;
use lib "$ENV{SCMS_HOME}lib";
use logme;


my $logFileName = shift;
logme::init($logFileName);

my @syb1 = system("/home/cfso/scripts/EVL_Loggers/check_tlm_MCF_EA_SYB1.csh");
logme::log("INFO","SYB 1 TLM Check @syb1\n");

my @syb2 = system("/home/cfso/scripts/EVL_Loggers/check_tlm_MCF_EA_SYB2.csh");
logme::log("INFO","SYB 2 TLM Check @syb1\n");

my @syb3 = system("/home/cfso/scripts/EVL_Loggers/check_tlm_MCF_EA_SYB3.csh");
logme::log("INFO","SYB 3 TLM Check @syb1\n");