$new_name =~ s/\.log/\.txt/ig  or next;