p1 = outfile("./test.txt" "w") =>port:"./test.txt" ;创建一个2.txt在设计目录下,并打开写操作
fprintf(p1 "hello 2 3 world") =>t ;向test.txt写入hello 2 3 world
close(p1) =>t
x = infile("./test.txt")=> port:"./test.txt" ;读取test.txt
fscanf( x "%s %d %d %s" a b c d )=> 4 ;扫描test.txt中4个字符
print(a) =>"hello" nil;打印字符串
printf(a)=>hello t ;打印test.txt中保留到a中的信息
println(a) =>"hello" nil;打印字符串
fprintf(a)=>E- *Error* fprintf: too few arguments (at least 2 expected, 1 given) - ("hello")
fprintf(nil "%s" a) =>E- *Error* fprintf: argument #1 should be an I/O port (type template = "ptg") - nil 必须是端口,且是打开的端口
sprintf(nil "%s" a) =>"hello"
lista=list(a b c d) => ("hello" 2 3 "world") ;构建新列表