#	my $filename='$mydir\file_detail.txt';
#	open (FILE, '$filename');
	open (FILE, 'D:\SiebelAdmin\CSS\file_detail.txt');
	while (<FILE>)
        {}