Permalink
Switch branches/tags
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
40 lines (30 sloc) 746 Bytes
function suffix=suf(string,delim,iter)
% suffix=SUF(string,delim,iter)
%
% Finds the suffix or extension in a string, say a filename.
%
% INPUT:
%
% string The string to be parsed
% delim The string that separates prefix from suffix
% iter 0 Don't iterate
% 1 Iterate on the suffix to get the last bit
%
% See also PREF
%
% Last modified by fjsimons-at-alum.mit.edu, 05/06/2008
defval('delim','.');
defval('iter',1)
ldel=length(delim);
[prefix,suffix]=strtok(string,delim);
% This added 17.11.2004
if iscell(suffix)
suffix=cell2mat(suffix);
end
suffix=suffix(ldel+1:end);
if iter==1
% This suffix might not be the last one
while findstr(suffix,delim)
suffix=suf(suffix,delim);
end
end