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