read函数负责从文件句柄中读取指定数量的字节，并将这些字节放在标量型变量中。
如果熟悉c的标准i/o函数fread的话，就会发现read函数也是以相同方式处理i/o缓冲的。
为了提高效率，read函数并不是一次读取一个字节，而是读取一块数据并保存到临时存储区中。然后，c的fread函数与perl的read函数会从临时缓冲区将数据一次一个字节地传送给程序。（
sysread函数可用于模拟c的底层i/o函数read。）该函数会返回读取的字节总数；或者在发生错误时，返回未定义的数字。如果碰到了eof（文件结束符），则返回0。
由于输出/读入格式太长，为使write/read语句简洁，将write/read语句中放format的地方用行号代替如write(*,100)var1,var2,var3,var4100 format(5X, I5.2, F10.3, A, E14.7)或CHARACTER(LEN=30) :: formatformat = "(5X, I5.2, F10.3, A, ES14.7)"write(*,format)var1,var2,var3,var4
read函数（fread）。 read函数负责从文件句柄中读取指定数量的字节，并将这些字节放在标量型变量中。
读者如果熟悉C的标准I/O函数fread的话，就会发现read函数也是以相同方式处理I/O缓冲的。为了提高效率，read函数并不是一次读取一个字节，而是读取一块数据并保存到临时存储区中。
然后，C的fread函数与Perl的read函数会从临时缓冲区将数据一次一个字节地传送给程序。
（sysread函数可用于模拟C的底层I/O函数read。）该函数会返回读取的字节总数；或者在发生错误时，返回未定义的数字。
如果碰到了EOF（文件结束符），则返回0。
print函数（而不是write函数）负责输出read函数返回的实际字节。
print函数类似于C中的fwrite函数。