Форум — Admin Вывод N-го слова из файла perl, sed 0 3 Доброго времени суток!А как вывести слово под номером N из файла? sed-ом, например. Ссылка
Запустить два sed'а, первый чтобы заменил все разделители слов на перевод строки, а второй вывел строку с нужным номером:sed 's/[ \t][ \t]*/\n/g' | sed '3q;d'Наверное, сюда ещё нужно добавить удаление пустых строк из исходного файла. mky ★★★★★ (20.03.16 03:55:40 MSK) Последнее исправление: mky 20.03.16 03:59:45 MSK (всего исправлений: 1) Ссылка
perl -0anE 'say $F[2]' file Deleted (20.03.16 05:29:08 MSK) Последнее исправление: Deleted 20.03.16 05:30:51 MSK (всего исправлений: 1) Показать ответ Ссылка
gawk -vFS='[^[:alnum:]]+' -vRS='\0' '{print $3}' salsa ★ (20.03.16 09:54:33 MSK) Последнее исправление: salsa 20.03.16 09:59:31 MSK (всего исправлений: 1) Ссылка
awk '{print $3}'Update: Хотя может не прокатит если слова находятся на разных строках. snaf ★★★★★ (20.03.16 13:07:26 MSK) Последнее исправление: snaf 20.03.16 13:08:44 MSK (всего исправлений: 1) Ссылка
Ответ на: комментарий от Deleted 20.03.16 05:29:08 MSK Спасибо! работает! aido ★★ (20.03.16 14:55:33 MSK) автор топика Ссылка
не седом но перлом:cat file |perl -e 'my @array; while(<STDIN>){foreach my $temp ( split(/\b/,$_) ){push(@array, $temp)}}; print $array[n]' anonymous (20.03.16 22:32:00 MSK) Ссылка