my $S='C:Users\name\Desktop\a.txt';