find(strcmp(strsplit(path,":"),'.')) addpath(pwd) find(strcmp(strsplit(path,":"),'.')) mkdir tmp; cd tmp; fname = 'file_to_run'; fid = fopen([fname '.m'],'w'); fprintf(fid, 'a=1'); fclose(fid); pwd ls([fname '.m']) evalin('base', fname)