Basit. Dosya adlandırmada insanlar boşluk kullandığında dayanamıyorum. Bazen konsol komutlarını mahveder ve ls çıktısını çirkin yapar.

Buradaki zorluk bir program yazmaktır (sadece ascii karakterler).

1. Geçerli dizindeki tüm dosyaları (dizinler dahil), '_' ile kaldırılmış veya değiştirilmiş boşluklarla değiştirir
2. Çarpışmada, benzersiz bir tanımlayıcı eklemeniz gerekir (size kalmış)
3. yinelenerek tüm alt dizinlere iner

UNIX tarzı yol adlarını kabul edebilirsiniz. Zaten bir Windows makinesinde bu programa kim ihtiyaç duyacak?

Bu kod golf, en kısa program kazanıyor (#ascii karakterleri). Uzaylardan çok nefret ettiğimden, her alanın iki kez sayılması gerekir.

Lütfen dilinizi, puanınızı, programınızı ve nasıl çalıştırılacağınızla ilgili kısa bir açıklama girin.

Program, Linux makinemde makul bir çaba ile derlenmeli ve yürütülmelidir.

EDIT: Etan test için bir dosya yapısı istediğinden, şu anda uygun bir dosya ağacı oluşturmak için kullandığım komut dosyası:

#!/bin/bash
rm -r TestDir

touchfiles()
{
    touch my_file
    touch my__file
    touch "my file"
    touch "my  file"
    touch " my_file  "
}

mkdir TestDir
cd TestDir

touchfiles

for dir in "Test Sub" Test_Sub "Te stSub" Te_stSub
do
    mkdir "$dir"
    cd "$dir"
    touchfiles
    cd ..
done

Zsh + GNU coreutils - 48 bayt (1 boşluk)

for x   (**/*(Dod))mv   -T  --b=t   $x  $x:h/${${x:t}// }

(ASCII) boşluklarından nefret etmen garip ama sekmeler ve yeni satırlarla iyi, ama sanırım her türlü sürüyor.

zmv , çok sayıda dosya yeniden adlandırma sorununu tam olarak (ve sadece biraz gizlice) çözer . Ancak, hedeflerin benzersiz olması konusunda ısrar ediyor; Kolayca benzersiz son ekler ekleyebilseniz de, yalnızca hemen gerekmesi durumunda bir son ek eklemek tüm işi yeniden yapmayı gerektirir. Bu yüzden , çarpışma durumunda benzersiz bir tanımlayıcı eklemek için manuel olarak döngüdeyim ve GNU mv'ye güveniyorum ( --backupseçenek, ayrıca --no-target-directoryhedefin varolan bir dizin olması durumunda mv, kaynağı o dizinin içinde taşıyacağı gibi ).

(od)Çıktıyı içeriklerinden sonra görünen dizinlerle sıralamak için bir glob niteleyicisidir-depth . Dglobdaki nokta dosyalarını içerir. :hve :tolan tarih düzenleyiciler benzer dirnameve basename.

mvglob, boşluk içermeyen dosya adları içerdiğinden, dosyaların kendilerinin adını değiştirmeye çağrıldığından şikayet eder. C'est la vie.

Ungolfed versiyonu:

for x in **/*\ *(Dod); do
  mv --no-target-directory --backup=numbered $x ${x:h}/${${x:t}// /}
done

Bash 116 bayt, 16 boşluk

find . -depth -exec bash -c 'B=${0##*/}
M="${0%/*}/${B// /_}"
while [ -e "$M" ]
do M=$M.
done
mv "$0" "$M"' {} \;

Birkaç bayt daha kazanmak için hataları bastırmadım. Bunun herhangi bir çarpışması olmayacak.

Posix olmayan GNU findbeklenebilirse, bu daha da kısaltılabilir:

Bash 110 bayt, 15 boşluk

find -d -exec bash -c 'B=${0##*/}
M="${0%/*}/${B// /_}"
while [ -e "$M" ]
do M=$M.
done
mv "$0" "$M"' {} \;

Bunları değiştirmek yerine boşlukları kaldırmak, iki daha az bayt kullanır:

Bash 108 bayt, 15 boşluk

find -d -exec bash -c 'B=${0##*/}
M="${0%/*}/${B// }"
while [ -e "$M" ]
do M=$M.
done
mv "$0" "$M"' {} \;

Not: boşluklar yerine sekmeler kullanılabiliyorsa, sadece 1 boşluk gerekir (satır 2'de yer değiştirme için eşleşme kuralında olan).

Çifte alıntıda hata bulduğu için Dennis'e teşekkür ederim (ve çözüm sağlar)

Python 180 bayt

from    os  import*
t,c,h='.',chdir,path
def g(p):
    c(p)
    for x   in  listdir(t):
        if h.isdir(x):g(x)
        n=x.replace(' ','')
        while h.exists(n):n+=t
        if' 'in x:rename(x,n)
    c(t*2)
g(t)

girinti için sekme kullanırsanız sadece 2 boşluk :-)

Çarpıştırılmış dosya soneklerinin sırasının önceden var olan dosyaya emsal vermek zorunda kalmaması durumunda, aşağıdakiler benim için çalışır:

bash / find / mv 84 bayt, 16 boşluk

find -depth -execdir bash -c '[ "${0//[^ ]}" ] && mv -{T,--b=t} "$0" "${0// }"' {} \;

bash / find / mv 82 bayt, 14 boşluk

find -depth -execdir bash -c '[ "${0//[^ ]}" ]&&mv -{T,-b=t} "$0" "${0// }"' {} \;

&&İki boşluk baytını kurtarmak için sarıldı .

bash / find / mv 60 bayt, 11 boşluk

find -d -execdir bash -c 'mv -{T,-b=t} "$0" "${0// }"' {} \;

Hata korumasını azaltır, böylece başlangıçta boşluğu olmayan dosyalarda mv'den hata alır.

Düzenleme: {}Dennis'in hatırlattığı şekilde alıntıları düşürdüm. Ayrıca , bir dosyayı kendi üzerine taşımak findüzere çığlık atmakta olan en kısa sürümde taşınabilirlik ve kullanımdan kaldırma hakkında çığlık atmasına izin verildi mv.

Düzenleme 2: pqnet tarafından belirtildiği şekilde yeniden adlandırmak yerine iç içe geçmiş dizinleri önlemek -Tiçin mvkomuta eklendi. Sadece bir boşluk kullanarak bir karakterin maliyeti pahasına kullanılan payanda.

DüğümJS - 209 bayt, 3 Boşluk

s=require('fs');function a(d){s.readdirSync(d).forEach(function(f){f=d+'/'+f;i=0;r=f;if(/ /.test(f)){r=f.replace(' ','');while(s.existsSync(r))r+=i++;s.renameSync(f,r)}s.statSync(r).isDirectory()&&a(r)})}a('.');

Bash - 86 bayt

find    .   -d|while    IFS=""  read    f;do    t=${f##*/};mv   --b=t   -T  "$f"    "${f%/*}"/${t// /};done

Bash + Perl rename64

( renameutil-linux komutu yerine Debian ve türevlerinde Perl betiğidir.)

find . -depth -name "* *" -execdir rename 'y/ /_/' * \;

POSIX sh+ GNU find+ GNU mv67 ASCII bayt + bir (değişmez) alanı

find    -d  -exec   sh  -cf 'IFS=\ ;IFS=_   set $0;mv   --b=t   "$0"    "$*"'   {}  \;

Uyuyor mu bilmiyorum, ama bununla herhangi bir boşluk dizisi teke seçildi _- yine de hoşuma gitti. Aslına bakarsanız, herhangi bir sekanstan başka olan / takip eden boşluklar - bunlar otomatik olarak kesiliyor (ki, sanırım, yararlı bir davranış) . Bu işaret için Gilles teşekkür ederiz.

Bu sadece alanları ayırmak için iç alan ayırıcısını kullanır.

Oldukça ... konuşkan ...

... ahbap. Sekme işinin ucuz olduğunu biliyordum, ama en azından zekice olduğunu düşündüm. Şimdi partiye geç kaldım ...

PHP, 147 145 bayt, 2 1 boşluk s -> 146

function    s(){foreach(glob("*")as$n){is_dir($n)&&chdir($n)&s()|chdir("..");if($n<$r=strtr($n," ",_)){while(file_exists($r))$r.=_;rename($n,$r);}}}

özyinelemeli işlev. İle koşs(".");

globVerilen yol için sonuçlar arasında geçiş yapın :

• eğer dizin, tekrarla
• alt çizgi ile boşlukları değiştir
• dizeleri farklıysa
  • yeni dosya adı alınırken alt çizgi eklenir
  • dosya / dizini yeniden adlandır

Ruby 121

require 'find'

Find.find('.') do |file|
  if file.chomp.match(/ /)
    File.rename(file, file.gsub(/ /, '_'))
  end
end

Python, 187

165, artı boşluklar için 22 ceza puanı.

from os import*
u='_';j=path.join
for t,d,f in walk('.',0):
 for z in f+d:
  n=z.replace(' ',u)
  if n!=z:
   while path.exists(j(t,n)):n+=u
   rename(j(t,z),j(t,n))

166, Emanuele'nin numarasını kullanarak :

Bunda sadece bir boşluk var!

from    os  import*
u='_';j=path.join
for t,d,f   in  walk('.',0):
    for z   in  f+d:
        n=z.replace(' ',u)
        if  n!=z:
            while   path.exists(j(t,n)):n+=u
            rename(j(t,z),j(t,n))

LiveScript - 166

(Boşlukları sekmelerle değiştirin.)

(a=->(s=require \fs)readdirSync(it)map (f)->f=it+'/'+f;r=f.replace /\s/g,i='';(while f!=r&&s.existsSync r=>r+=i++);s.statSync(f)isDirectory(s.renameSync f,r)&&a r) \.

Dayanarak nderscore en iyi duruma sürümü ait CPU1'in 'ın cevabı .

Bash 4+ 111 bayt

shopt -s dotglob globstar
for f in **
do
n=${f// /}
while [[ $f != $n && -e $n ]]
do n+=1
done
mv "$f" $n
done

Harika, 139 karakter

def c
c={
f->
def g=new File(f.parent,f.name.replaceAll('\\s',''))
f.renameTo(g)
!g.directory ?: g.eachFile(c)
}
new File('.').eachFile(c)

@ edc65 yoruma göre

Büyük, çarpışmalarla başa çıkma, 259 karakter

def c
c={
p,l,f->
def g=new File(p,f.name.replaceAll('\\s',''))
f==g?:
(g.exists()?f.renameTo(g.toString()+l.indexOf(f.name)):f.renameTo(g))
!g.directory?:g.eachFile(c.curry(g,g.list().toList()))
}
def r=new File('.')
r.eachFile(c.curry(r,r.list().toList()))

POSIX (zsh'de test edilmiştir) + temel Linux komutları 151

export IFS='
'
for f in $(ls -R1);do export n=$(echo $f|tr ' ' '_');yes n|mv $f $n || yes n|mv $f `echo $n;echo $f|md5sum`
done