DouKaku?

「どう書く？org」へようこそ！このサイトは出されたお題をいかに解くか競い合う、プログラマのためのコロシアムです。投稿を試してみたい方はテスト、とりあえず眺めてみたい方は言語の一覧がおすすめです。

以下の変更を加えました。ver.0.58(rev345)

@

ファイル名の表示順序としてWindows Vista以降のExplorerや、KDEのDolphinでもいつの間にか、単純な辞書順ソートではなく数字混じりの文字列を数字順に並べるソートが採用されています。ここではそのソート方法を数字混じり文字列ソートと呼びます。

さて、数字混じり文字列ソートを実装してください。なお入力される文字はASCII文字を仮定して構いませんが、日本語の扱える文字コードにも対応していればより理想的です。

以下に、数字混じり文字列ソートでの挙動の例を示します。

例1:

辞書順ソート: 1.txt, 10.txt, 100.txt, 2.txt, 20.txt

数字混じり文字列ソート: 1.txt, 2.txt, 10.txt, 20.txt, 100.txt

例2:

辞書順ソート: x12, x13, x1A, x1B, xAB

数字混じり文字列ソート: x1A, x1B, x12, x13, xAB

例3:

辞書順ソート: A10B1, A10B10, A10B2, A1B1, A1B10, A1B2, A2B1, A2B10, A2B2

数字混じり文字列ソート: A1B1, A1B2, A1B10, A2B1, A2B2, A2B10, A10B1, A10B2, A10B10

post comment Number of comments:6 Hidden Nested Flatten

Clojureです．
始めはloop recurを使うつもりでしたが，
file-seqなるものを見付けたので使ってみました．

(import '(java.io File))

(doall
 (for [f (file-seq (File. (first *command-line-args*)))
       :when (.endsWith (.getName f) "~")]
   (.delete f)))

Information