switch (uc($array[0]))    {
            case (uc("Time_Stamp"))    {
                @time = split (/-/, $array[1]);
                $date_submited = $time[0];

##</code><code>##

                $wafer_flow = "$lotid[1]-$lotid[2]";