			$tag = $2; # Assign "SRC value" As TAG	
		}
	}

	while ( $anchor =~ /\s*<\s*(.+?)\s*(.*?)\s*>\s*(.*)\s*<\s*\/\1\s*>\s*/i )
	{	
		$anchor = $3;
	}

#---- If There Is Any Title Return It Else Return Tag ----#

return $anchor unless($anchor =~ /^\s*$/);
return $tag;

}		 

?)/i)
	{

		#---- Featch "SOURCE" And "ALT" From It ----#

		$img_tag = $2;
		if($img_tag =~ /(.*?)alt\s*=\s*\"(.*?)\"\s*(.*?)/i)
		{
			$tag = $2; # Assign "ALT value" As TAG
		}elsif($img_tag =~ /(.*?)src\s*=\s*\"(.*?)\"\s*(.*?)/i)
		{
