#!/sw/bin/gawk -f BEGIN{RS = "#Q#Q#Q#Q#W"; FS = "#Q#Q#W#ER"; ORS = ""} { tree = $0; } END{ gsub(/[\t\n\ ]/,"",tree); gsub(/\,/, ":1.0,", tree); gsub(/\)/, ":1.0)", tree); print tree ";"; }