/* Test the read built-in external */
proc
main() {
var
t; t =
readstr
();
say
( t );
say
(
"\n"
); }