@csv_out = "m2000_id","2014-04-23 11:48:30","Ne is Disconnected",14742,10.35.22.201,"NULL",6007,"N/A","FailedtosetSSLconnectionmode","MediationService0206",10.9.74.12,405171,"874986",0,1,11,1,1,1,0,1,-",1389020188,"1389020188",1415599200,0,0,0,0,1,301,0,1389020188,0,0,0

##</code><code>##

 elsif ($_ =~ m/[a-zA-Z]/ || $csv_out[0 .. 10]){
                print "$_\n";
                $_=~ s/,/ /g;
                print WRITEFILE '"'."$_".'"' . "," ;