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.
