以下为引用的内容: <?php /********************************* * * 作者: 徐祖宁 (唠叨) * 邮箱: czjsz_ah@stats.gov.cn * 开发: 2002.07 * * * 函数: tags * 功能: 从文件中提取HTML标签 * * 入口: * $filename 文件名 * $tag 标签名 * 返回: * 数组,每项为: * tagName String * Text String * Attrs Array php程序员站 * * 示例: * print_r(tags("test1.htm","a")); * print_r("http://localhost/index.htm","img"); * */
function tags($filename,$tag) { $buffer = join("",file($filename)); $buffer = eregi_replace("\r\n","",$buffer); $tagkey = sql_regcase($tag); $buffer = eregi_replace("<$tagkey ","\n<$tag ",$buffer); $ar = split("\n",$buffer);
foreach($ar as $v) { if(! eregi("<$tagkey ",$v)) continue; eregi("<$tagkey ([^>]*)((.*)</$tagkey)?",$v,$regs); $p[tagName] = strtoupper($tag); if($regs[3]) $p[Text] = $regs[3]; $s = trim(eregi_replace("[ \t]+"," ",$regs[1]))." "; php程序员之家 $s = eregi_replace(" *= *","=",$s);
$a = split(" ",$s); for($i=0;$i<count($a);$i++) { $ch = array(); if(eregi("=[\"']",$a[$i])) { $j = $i+1; while(!eregi("[\"']$",$a[$i])) { $a[$i] .= " ".$a[$j]; unset($a[$j]); } } } foreach($a as $k) { $name = strtoupper(strtok($k,"=")); $value = strtok("\0"); php程序员站 if(eregi("^[\"']",$value)) $value = substr($value,1,-1); if($name) $p[Attrs][$name] = $value; } $pp[] = $p; } return $pp; }
?> |
|