my $file='T:\temp\temp.txt';