парсинг

[gunguru]

необходимо вытащить тексты из массива $clean_result вырезать из них то что находится между тегами <p></p> и записать в отдельные файлы:
$count=count($clean_result);

for ( $i=0;$i<$count ; $i++ ){
$files3=fopen("finarticles/article_".$i.".txt",'w');

$article1=file_get_contents($clean_ result[$i]);
preg_match_all("/<p>(.*) <\/p>/U",$article1,$fin);
}
fwrite($files3,$fin);
что я делаю не так?

[spein]

циклом открываешь файл, не закрывая его.