Datei in eine Zeile ausgeben: '$1', '$2', ...: Perl-Einzeiler - #75567 (Allgemeines zu Perl)

PerlProfi

2007-03-30 17:49

User since
2006-11-29
340 Artikel
BenutzerIn
[default_avatar]

So könntest du es machen:

Code: (dl )

perl -pe "s/^(.*?)(\n)?$/'$1', /; (chop, chop) if eof" t.txt

Das ? hinter \n, falls die Datei nicht mit \n aufhört.

MfG