求教在Fortran中怎样打开循环文件夹

冰雨蝶

我需要从一个大的文件夹oriw里的系列小文件夹里提取数据进行处理，求教大神怎样循环打开文件夹，文件夹名称从5到100，打开每个文件夹里的文件p.dat.
do t=5,100
filename=oriw / t / p.dat
open(1,file=filename)
end  do
求教怎样编辑文件名t，Fortran才能识别