$statsmmrtg=$i[3]; #### if ($statsm ne "") { open(OUTPUT, ">$datapath/statsmplain"); print OUTPUT "$statsm"; close OUTPUT; }