print {$OUT} "xxxxx", $data[0], "yyy", $data[2],";","\n";