MatLab提取网络地址

clear;clc;

%initalize
UrlNums = 15;
urlpath{UrlNums}='';
url{UrlNums}='';
wb=waitbar(0,'Please wait...');

for i=1:length(urlpath)
waitbar(i/length(urlpath),wb,['have processed ',num2str(i),' urls'])
urlpath{i}=['http://www.ilovematlab.cn/thread-2209',num2str(54+i),'-1-1.html'] ;
tmp=urlread(urlpath{i});
%the type of regexp's result is cell.
%regex in matlab don't support gready match mode.
url(i)=regexp(tmp,'http.{10,53}\.wmv','match');
end
close(wb);
[fname,fpath]=uiputfile({'*.txt','Text(*.txt)'},'Please Save The File.','url.txt');
fid = fopen(fullfile(fpath,fname),'wt');
for i=1:length(url)
fprintf(fid,'%s\r\n',url{i});
end
fclose(fid);