Función para extraer tags de un string

/**
 * Extraer Tags entre corchetes []
 * Ejemplo de Bucle For
 * Ejemplo de recorrer un string
 * Ejemplo de Substring
 *
 * @param String $p_string String to analyze
 * @param String $p_begin  Character begin label
 * @param String $p_end    Character end label
 * @return Array
 */
function extract_tags($p_string, $p_begin = "[",$p_end = "]")
{
	$tags = array();
	$tag_scan = false;
	for ( $i = 0; $i < strlen($p_string); $i++ )
	{
		if (substr($p_string,$i,1) == $p_begin)
		{
			// Begin tag
			$tag_txt = ""; // Se inicializa el label
			$tag_scan = true;
		}
		if ($tag_scan)
		{
			$tag_txt.= substr($p_string,$i,1);
		}
		if (substr($p_string,$i,1) == $p_end)
		{
			// End label
			$tag_scan = false;
			$tags&#91;&#93; = $tag_txt;
		}
	}
	return $tags;
}
?>