{
 d1 = "";
 d2 = "";
 if (match($0, "one|two|three|four|five|six|seven|eight|nine|[0-9]")) { d1 = substr($0,RSTART,RLENGTH) }
 for (i = length($0); i > 0; i--) {
    s = substr($0, i);
    if (match(s, "one|two|three|four|five|six|seven|eight|nine|[0-9]")) { d2 = substr(s,RSTART,RLENGTH); break; }
 }
 n = d1 d2;
 print n;
 gsub("one","1",n); gsub("two","2",n); gsub("three","3",n);
 gsub("four","4",n); gsub("five","5",n); gsub("six","6",n);
 gsub("seven","7",n); gsub("eight","8",n); gsub("nine","9",n);
 T += n;
 print $0, n;
}
#{ print $0 }
END { print T }