Làm cách nào để nối nhiều dòng tên tệp thành một với dấu phân cách tùy chỉnh?

Tôi muốn tham gia kết quả của ls -1một dòng và phân định nó với bất cứ điều gì tôi muốn.

Có bất kỳ lệnh Linux tiêu chuẩn nào tôi có thể sử dụng để đạt được điều này không?

Tương tự như tùy chọn đầu tiên nhưng bỏ qua dấu phân cách

ls -1 | paste -sd "," -

EDIT : Đơn giản là " ls -m " Nếu bạn muốn dấu phân cách của bạn là dấu phẩy

Ah, sức mạnh và sự đơn giản!

ls -1 | tr '\n' ','

Thay đổi dấu phẩy " , " thành bất cứ điều gì bạn muốn. Lưu ý rằng điều này bao gồm một "dấu phẩy"

Điều này thay thế dấu phẩy cuối cùng bằng một dòng mới:

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

ls -m bao gồm các dòng mới ở ký tự chiều rộng màn hình (ví dụ thứ 80).

Chủ yếu là Bash (chỉ lslà bên ngoài):

saveIFS=$IFS; IFS=$'\n'
files=($(ls -1))
IFS=,
list=${files[*]}
IFS=$saveIFS

Sử dụng readarray(aka mapfile) trong Bash 4:

readarray -t files < <(ls -1)
saveIFS=$IFS
IFS=,
list=${files[*]}
IFS=$saveIFS

Cảm ơn gniourf_gniourf cho các đề xuất.

Tôi nghĩ rằng điều này là tuyệt vời

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

ORS là "dấu tách bản ghi đầu ra", vì vậy bây giờ các dòng của bạn sẽ được nối bằng dấu phẩy.

Sự kết hợp của thiết lập IFSvà sử dụng "$*"có thể làm những gì bạn muốn. Tôi đang sử dụng một lớp con nên tôi không can thiệp vào $ IFS của shell này

(set -- *; IFS=,; echo "$*")

Để nắm bắt đầu ra,

output=$(set -- *; IFS=,; echo "$*")

Phân tích cú pháp lsnói chung không được khuyến khích , vì vậy cách tốt hơn là sử dụng find, ví dụ:

find . -type f -print0 | tr '\0' ','

Hoặc bằng cách sử dụng findvà paste:

find . -type f | paste -d, -s

Để tham gia nhiều dòng chung (không liên quan đến hệ thống tệp), hãy kiểm tra: ngắn gọn và di động , hãy tham gia vào dòng chữ trên dòng lệnh Unix .

Đừng phát minh lại bánh xe.

ls -m

Nó làm chính xác điều đó.

chỉ cần bash

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

Lệnh này dành cho người hâm mộ PERL:

ls -1 | perl -l40pe0

Ở đây 40 là mã bát phân bát phân cho không gian.

-p sẽ xử lý từng dòng và in

-l sẽ đảm nhiệm việc thay thế dấu vết \ n bằng ký tự ascii mà chúng tôi cung cấp.

-e là để thông báo cho PERL chúng tôi đang thực hiện dòng lệnh.

0 có nghĩa là thực sự không có lệnh để thực thi.

perl -e0 giống như perl -e ''

Để tránh nhầm lẫn dòng mới tiềm năng cho tr, chúng tôi có thể thêm cờ -b vào ls:

ls -1b | tr '\n' ';'

Có vẻ như các câu trả lời đã tồn tại.

Nếu bạn muốn a, b, cđịnh dạng, hãy sử dụng ls -m( câu trả lời của Tulains Córdova )

Hoặc nếu bạn muốn a b cđịnh dạng, hãy sử dụng ls | xargs(phiên bản mô phỏng câu trả lời của Chris J )

Hoặc nếu bạn muốn bất kỳ dấu phân cách nào khác |, hãy sử dụng ls | paste -sd'|'(áp dụng câu trả lời của Artem )

Thêm vào đầu câu trả lời của Majkinetor, đây là cách xóa dấu phân cách dấu (vì tôi không thể chỉ nhận xét dưới câu trả lời của anh ấy):

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

Chỉ cần loại bỏ bao nhiêu byte theo sau là dấu phân cách của bạn.

Tôi thích cách tiếp cận này vì tôi có thể sử dụng các dấu phân cách nhiều ký tự + các lợi ích khác của awk:

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

BIÊN TẬP

Như Peter đã nhận thấy, số byte âm không được hỗ trợ trong phiên bản đầu MacOS gốc. Điều này tuy nhiên có thể dễ dàng sửa chữa.

Đầu tiên, cài đặt coreutils. "Các tiện ích cốt lõi của GNU là các tiện ích thao tác tệp, vỏ và văn bản cơ bản của hệ điều hành GNU."

brew install coreutils

Các lệnh cũng được cung cấp bởi MacOS được cài đặt với tiền tố "g". Ví dụ gls.

Khi bạn đã hoàn thành việc này, bạn có thể sử dụng gheadcó số byte âm hoặc tốt hơn, tạo bí danh:

alias head="ghead"

Cách quyến rũ,

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

Lưu ý :

Đây là tuyến tính phức tạp, chỉ thay thế một lần sau khi tất cả các dòng được nối vào Không gian mẫu của sed.

Câu trả lời của @ AnandRajaseka và một số câu trả lời tương tự khác, như ở đây , là O (n²), bởi vì sed phải thay thế mỗi khi một dòng mới được thêm vào Không gian mẫu.

Để so sánh,

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

Nếu phiên bản xargs của bạn hỗ trợ cờ -d thì nó sẽ hoạt động

ls  | xargs -d, -L 1 echo

-d là cờ phân cách

Nếu bạn không có -d, thì bạn có thể thử cách sau

ls | xargs -I {} echo {}, | xargs echo

Các xargs đầu tiên cho phép bạn chỉ định dấu phân cách của bạn là dấu phẩy trong ví dụ này.

sed -e :a -e '/$/N; s/\n/\\n/; ta' [filename]

Giải trình:

-e- biểu thị một lệnh được thực thi
:a- là nhãn
/$/N- xác định phạm vi khớp cho dòng mở rộng hiện tại và (N)
s/\n/\\n/;- thay thế tất cả EOL bằng \n
ta;- nhãn goto a nếu khớp thành công

Lấy từ blog của tôi .

Bạn có thể dùng:

ls -1 | perl -pe 's/\n$/some_delimiter/'

lstạo ra một đầu ra cột khi được kết nối với một đường ống, do đó, -1là dự phòng.

Đây là một câu trả lời perl khác bằng cách sử dụng joinhàm dựng sẵn không để lại dấu phân cách:

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

Việc tối nghĩa -0777làm cho perl đọc tất cả các đầu vào trước khi chạy chương trình.

sed thay thế mà không để lại một dấu phân cách

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

lscó tùy chọn -mphân định đầu ra bằng ", "dấu phẩy và dấu cách.

ls -m | tr -d ' ' | tr ',' ';'

đường ống kết quả này trđể loại bỏ khoảng trắng hoặc dấu phẩy sẽ cho phép bạn đặt lại kết quả trđể thay thế dấu phân cách.

trong ví dụ của tôi, tôi thay thế dấu phân cách ,bằng dấu phân cách;

thay thế ;bằng bất cứ ký tự phân cách một ký tự nào bạn thích vì tr chỉ chiếm ký tự đầu tiên trong chuỗi bạn truyền vào dưới dạng đối số.

Bạn có thể sử dụng chomp để hợp nhất nhiều dòng trong một dòng:

perl -e 'while (<>) {if (/ \ $ /) {chomp; } in;} 'bad0> kiểm tra

đặt điều kiện ngắt dòng trong if statement. Nó có thể là ký tự đặc biệt hoặc bất kỳ dấu phân cách nào.

Phiên bản Perl nhanh với xử lý dấu gạch chéo:

ls -1 | perl -E 'say join ", ", map {chomp; $_} <>'

Giải thích:

• perl -E: thực thi Perl với các tính năng hỗ trợ (giả sử, ...)
• nói: in với trả lại hãng
• tham gia ",", ARRAY_HERE: tham gia một mảng với ","
• bản đồ {chomp; $ _} ROWS: xóa khỏi từng dòng mà nhà mạng trả về và trả về kết quả
• <>: stdin, mỗi dòng là ROW, khớp với bản đồ, nó sẽ tạo ra một mảng của mỗi ROW