How to find the tringles in your mesh for modification

int $numFacee[],$vtxNum;

string $vtxInfoo[],$vtxArr[],$objF,$sel[];

$sel=`ls -sl`;

$numFacee=`polyEvaluate -f $sel[0]`;

select -cl ;

for($i=0;$i<$numFacee[0];$i++){

$objF=$sel[0]+".f["+$i+"]";

$vtxInfoo=`polyInfo -fv $objF`;

$vtxArr=stringToStringArray($vtxInfoo[0]," ");

$vtxNum=size($vtxArr)-3;

if($vtxNum==3){

select -tgl $objF;

}

}