请高手帮忙解决一个二值图像中面积周长测定程序中需要改动的问题

zzs632

很高兴无意间看见你的博客，我有个MATLABT图像处理的小问题请教你，请指点，我发上代码你看看。
global S;
L=bwlabel(BW3);
P=imfeature(L,'Area');
S=[P.Area];
helpdlg(num2str(length(S)),'晶体颗粒个数')


function Untitled_13_Callback(hObject, eventdata, handles)
% hObject    handle to Untitled_13 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
global S;
for i=1:length(S)
    if( i<10) Q{i}=[num2str(i) '   ' num2str(S(i))];
    else
    Q{i}=[num2str(i) '  ' num2str(S(i)) ;
    end
end
set(handles.listbox1,'String',Q);

这两个是在文本框内正常显示颗粒个数和面积的函数，应经实现了
现在想改动一下加上显示周长这一项 ，应该怎么改动啊，请帮忙，我的邮箱zzs632@yahoo.com.cn