读取另一个文件中的若干行文本，作为命令来执行，可否？

pacoyang

比如说脚本文件abc.m内容为：

1. clear %第1行
   
2. clc
   
3. %
   
4. a=5;
   
5. b=12;   
   
6. c=cos(a+... %第6行
   
7.     b);
   
8. f=sin(a+b);

复制代码

另一个脚本文件def.m，这个脚本文件读取abc.m的第4到7行，并且当做命令来执行，执行后，当然可以在workspace中查看到变量a，b，c的值。

最初想到eval，但是对于有换行的情况，如abc.m的第6、7行，eval不行。

nwcwww

1. tmpStr = strsplit(fileread('abc.m'), '\n');
   
2. eval([tmpStr{4:7}])

复制代码

pacoyang

我的matlab版本比较低，没有strsplit。按你的提示，采用下面代码读出abc.m的内容

1. FID=fopen('abc.m','r');
   
2. str=[];
   
3. loop=1;
   
4. while loop   
   
5.   s=fgetl(FID);
   
6.   if s==-1
   
7.     loop=0;
   
8.   else
   
9.     str=[str;{s}];
   
10.    end   
    
11. end
    
12. fclose(FID);

复制代码

若直接采用eval([str])不行。若要运行，还需要有两个操作
一是，删除换行标记“...”
二是，每行后面需要插入一个空格

谢谢！

pacoyang

有了上面连个措施，将abc.m改为如下代码，4到11行也能运行。

1. clear
   
2. clc
   
3. %
   
4. a=5;
   
5. b=12;
   
6. c=a+...
   
7.     b;
   
8. if 2>1
   
9.     disp('ok');
   
10. end
    
11. f=sin(a+b);

复制代码

nwcwww

没有strsplit的话直接用regexp也行，

1. tmpStr = regexp(fileread('abc.m'), '[^\n]+', 'match');
   
2. eval([tmpStr{4:11}])

复制代码