open (PDFTYPELOG, "+>pdftype.txt") or die "cannot open file errorlog.txt for writing : $!";
	open (FILE_HANDLE, "D:\\MyScripts\\Social008-017.pdf") or die "cannot Social008-017.pdf for reading : $!";
	while ($LineContent = <FILE_HANDLE>)
	{
		print PDFTYPELOG ($LineContent);
	}