先日の作業により、クライアントがぶっ飛んでしまった。

日記

先日の作業により、クライアントがぶっ飛んでしまった。
XPを再インストールしようとしたがCDがやられてしまっている
仕方なく２０００をインストール。

折角デジタルピアノつなごうと思ったのに…
しかたない。
明日調達することにしよう。

んでもって、◇データのフォルダ細分化プログラムを作ってみた。
dosで動くためcmd.exeの駆動回数が多いような気もするが時間が解決するであろうことを前提にやってみた。
（初めてまともにwin版のruby使ったかもしれない。）

 #!/usr/bin/ruby -Ks
 dir=['e:/2003/a','e:/2000/a','e:\2001\a','e:\2002\a']
 dd=dir[0]
 dir.each{|dd|
 	Dir.glob(dd+'/*'){|d|
 		m = %r!/(\d\d)(\d\d)(\d\d)(\d\d)\.txt!.match(d)
 		distdir=d.gsub(%r!(200\d)/a/!){"a/#{$1}/a/#{m[1]}/#{m[2]}/#{m[3]}/"}.gsub(%r!/\d+\.txt!,'')
 		`mkdir #{distdir.gsub('/'){"\\"}}` unless test(?e,distdir)
 		`copy #{d.gsub('/'){"\\"}} #{distdir.gsub('/'){"\\"}}`
 	}
 }