for($il=0;$il<$isize;$il++)
{
	$input[$il] =~ s/<xref ref-type="fig" rid=/\\protect\\customizeref{/g;	
	if($input[$il] =~ /\\protect\\customizeref{(.*?)<\/xref>/)
	{
		# $input[$il] =~ /<xref ref-type="fig" rid="(.*?)<\/xref>/;
		print ("$1\n");
		$_ = $1;
		$same = $1;
		$dx1 = /"(.*)"/;
		$dx1= $1;
		$dx2 = />(.*)/;
		$dx2= $1;
		print ("$dx1\n");
		print ("$dx2\n");
		$input[$il] =~ s/\\protect\\customizeref{$same<\/xref>/\\protect\\customizeref{$dx1}{Figures}{}/g;				
		$input[$il] =~ s/$same/$dx1}{Figures}{}/g;
	}

	if((defined $same) and (defined $dx1))
	{
		print(">$same\n");
		$input[$il] =~ s/$same<\/xref>/$dx1}{Figures}{}/g;
	}
	
}