Subversion Repositories svn.Prod repos

Compare Revisions

No changes between revisions

Ignore whitespace Rev 38 → Rev 39

/filefind/elixir/Makefile
0,0 → 1,4
SCRIPT=filefind.exs
 
run:
LC_ALL=en_US.UTF-8 elixir $(SCRIPT) blaa
/filefind/elixir/filefind.exs
0,0 → 1,26
#! /usr/bin/env escript
# https://rosettacode.org/wiki/Walk_a_directory/Recursively
# TODO : de hele traversal nog schrijven, dit is alleen argument parsing
 
defmodule DezeModule do
 
def usage(progname, mesg) do
IO.puts "Usage: " <> progname <> " filefind"
IO.puts mesg
end
 
end
 
progname = System.cwd()
 
if length(System.argv) == 1 do
directory = Enum.at(System.argv(), 0)
if File.dir?(directory)
do
IO.puts "TODO: Now do the traversal"
else
DezeModule.usage(progname, "ERROR: Not a directory : " <> directory)
end
else
DezeModule.usage(progname, "ERROR: 1 argument expected")
end
Property changes:
Added: svn:executable
+*
\ No newline at end of property