if (-e "testfile") 
		{
                $check = 0;
                print "testfile is present\n";
		}
    else {
        $check = 1;
        $msg1= "testFile Is Not Avaliable. $timex";
$subj1="testFile Is Not Avaliable ";
insertlog($msg1);
maildl($msg1, $env, $subj1, $maillst);
last;
        }