if (-e $fn) { system("del $fn"); }