$y=sub($x, "\\t", "TAB")