COUNT COPY-FILE CR
COUNT
* COUNT ( counted-string -- string-pointer string-length )

usually before calling >TYPE

core ordinary primitive