USING: io.encodings.ascii io.files kernel literals prettyprint regexp sequences sets splitting ; "input.txt" ascii file-lines { "" } split dup [ combine length ] map-sum . [ intersection length ] map-sum .