\w only matches one character. It won't match literal dots. You might do better with m/Rescue21[\w\.]+_patch_[\w.]+DiffList.txt/. (I didn't test it.)