1 2 3 4 5 6 7
{ gsub("[^[:digit:]]", ""); part1 += substr($0, 1, 1) substr($0, length, 1); } END { print part1; }