View Problem
Process each file in a directory
import os
results = (process(f) for f in os.listdir(".") if os.path.isfile(f))
results = (process(f) for f in os.listdir(".") if os.path.isfile(f))
; (defn process-file [f] "process one file" body...)
(map process-file (.listFiles (File. ".")))
(map process-file (.listFiles (File. ".")))
foreach (string filename in System.IO.Directory.GetFiles(directory)) ProcessFile(filename);
% File basenames only - many tasks require absolute paths to work
lists:foreach(fun (FileOrDirPath) -> Worker(FileOrDirPath) end, file:list_dir(Directory)).
lists:foreach(fun (FileOrDirPath) -> Worker(FileOrDirPath) end, file:list_dir(Directory)).
% Absolute paths provided - will accomodate most tasks
lists:foreach(fun (FileOrDirPath) -> Worker(FileOrDirPath) end, list_dir_path(Directory)).
lists:foreach(fun (FileOrDirPath) -> Worker(FileOrDirPath) end, list_dir_path(Directory)).
for each(String^ filename in IO::Directory::GetFiles(dirname)) process(filename);
Submit a new solution for python, clojure, csharp, erlang ...
There are 11 other solutions in additional languages (fantom, fsharp, groovy, haskell ...)
