No BSD License
function B = WhichCatOrSPlitFiles(filename) FID = fopen(which(filename),'rt'); if FID>-1 slurp = fscanf(FID,'%c'); fclose(FID); A=regexp(slurp,'(?:CatOrSplitFiles\s+<)([^>]+)','tokens'); B=[A{:}]'; end;
Contact us at files@mathworks.com