ok... #!/usr/bin/perl -nl $o=$_;y/ /_/;-e||print("renaming $o ===> $_")&&rename$o,$_
ok so you are looping around <> and adding newlines... saving the name as $o y is an alias for tr checking if the file exists with -e || print msg && rename. very nice, thanks a lot.