ROOT='Data'; flist = dir(fullfile(ROOT,'*_frames')); bValidDirs = arrayfun(@(x)(x.isdir>0), flist); frameDirs = flist(bValidDirs); for i=1:length(frameDirs) movieTok = regexp(frameDirs(i).name, '([-\w]+?)_frames', 'tokens', 'once'); rename_frame_files(movieTok{1}); end