Ls在连接到管道时产生一列输出，因此-1是多余的。

下面是另一个使用内置join函数的perl答案，它不留下尾随分隔符:

ls | perl -F'\n' -0777 -anE 'say join ",", @F'

晦涩的-0777使perl在运行程序之前读取所有输入。

不留下尾随分隔符的Sed替代方法

ls | sed '$!s/$/,/' | tr -d '\n'

sed方法，

sed -e ':a; N; $!ba; s/\n/,/g'
  # :a         # label called 'a'
  # N          # append next line into Pattern Space (see info sed)
  # $!ba       # if it's the last line ($) do not (!) jump to (b) label :a (a) - break loop
  # s/\n/,/g   # any substitution you want

注意:

这在复杂度上是线性的，在所有行都附加到sed的模式空间之后只替换一次。

@AnandRajaseka的答案，和其他一些类似的答案，比如这里，是O(n²)，因为sed必须做替换每次新行追加到模式空间。

来比较,

seq 1 100000 | sed ':a; N; $!ba; s/\n/,/g' | head -c 80
  # linear, in less than 0.1s
seq 1 100000 | sed ':a; /$/N; s/\n/,/; ta' | head -c 80
  # quadratic, hung

就bash

mystring=$(printf "%s|" *)
echo ${mystring%|}

在majkinetor的回答之上，下面是删除尾随分隔符的方法(因为我还不能在他的回答下评论):

ls -1 | awk 'ORS=","' | head -c -1

只要删除分隔符所需要的尾随字节即可。

我喜欢这种方法，因为我可以使用多字符分隔符+ awk的其他好处:

ls -1 | awk 'ORS=", "' | head -c -2

EDIT

正如Peter所注意到的，head的原生MacOS版本不支持负字节计数。然而，这是很容易解决的。

首先，安装coreutils。GNU核心实用程序是GNU操作系统的基本文件、shell和文本操作实用程序。

brew install coreutils

MacOS提供的命令也以“g”开头安装。例如gls。

一旦你这样做了，你可以使用ghead，它有负字节计数，或者更好，使别名:

alias head="ghead"

上面的Python回答很有趣，但自己的语言甚至可以使输出更好:

python -c "import sys;打印(sys.stdin.read () .splitlines())”

这个命令是为PERL爱好者准备的:

ls -1 | perl -l40pe0

这里的40是空格的八进制ascii码。

-p将逐行处理并打印

-l将负责用我们提供的ASCII字符替换尾随的\n。

-e是通知PERL我们正在执行命令行。

0表示实际上没有命令要执行。

Perl -e0与Perl -e ' '相同