"\":Converting "dired-do-rename-regexp" into a "query-replace"?

[David Combs]

Subj: "\\":Converting "dired-do-rename-regexp" into a "query-replace"?

I need to turn this:

    (dired-do-rename-regexp 
"Lendman_1_\\([0-9][0-9]\\)\\([0-9][0-9]\\)\\([0-9][0-9]\\)_100000.mp3"     
"\\3\\1\\2-S.L.mp3")

into:

    (query-replace-regexp   "FROMPAT"  "TO-STRING"    nil (if (and 
transient-mark-mode mark-active) (region-beginning)) (if (and 
transient-mark-mode mark-active) (region-end)))


(the dired one works fine; now I want to adjust the regexps, but test them in 
an ascii file, not as file-names in dired.)

So, once I did that, how to convert it BACK into the dired-form>?

Thanks!

David