{ if (substr($0, 1, 1) != "X" && substr($0, 1, 1) != "Y") print $0; if (substr($0, 1, 1) != "X" && substr($0, 1, 1) != "Y") ; else{ l = $0; ex = 0; ey = 0; for (i = 1; i < length(l); i++){ if (substr(l, i, 1) == "X") ex = i; if (substr(l, i, 1) == "Y") ey = i; } if (ex == 0){ y0 = substr(l, 1, length(l)-1); } else if (ey == 0){ x0 = substr(l, 1, length(l)-1); } else{ x0 = substr(l, ex, ey-1); y0 = substr(l, ey, length(l)-ey); } print x0""y0; } }