let size_shell_command = function
| {kind = `File; path } ->
  fmt "\\ls -nl %s | awk '{print $5}'" (Filename.quote path)
| {kind = `Directory; path } ->  "echo '0'"