PG=cucat
HINT="
==========
$PG [-options] file(s)
==========
is for use with the XENIX communications command cu.
It reads as much of a file as will fit into memory,
transmitting the result one line at a time.  This is
intended to minimize disk accessing.
==========
"
H='stty -echo erase u kill u;times;cat - > %s\012'
H='stty -echo tandem erase u kill u;times;cat - > %s\012'
T="\012stty echo erase '^H' kill '^U';times;ls -l %s\012"
T="\012stty echo -tandem erase '^H' kill '^U';times;ls -l %s\012"
case $1 in
    -h|help|hint)   clear;echo "$HINT";cucat.x -h;exit 0;;
esac
exec cucat.x -p100 -H "$H" -T "$T" $*