if (-f "$name.txt") { $n=1; $n++ while -f "$name$n.txt"; }