LINUX.ORG.RU

Хелп Перл


0

0

есть файлик(name.log) примерно такого содержания 
dima
vasj
kilia
...
так как можно добавить в ╨тот файлик 
перед каждЁм именем (privet) чтобЁ получилось следующее:
privet dima
privet vasj
privet kilia
prinet ...
...
Ну при помощи перла естественно..
anonymous


С командной строки:

$ perl -pi.bak -e 's/^/privet /' name.log

При этом в name.log.bak останется на всякий
случай неизмененная копия.

Удачи.
Илья.

anonymous
()
Ответ на: комментарий от anonymous

а если я хочю записать ./privet
тогда как?

anonymous
()


To anonymous (*) (2001-03-23 12:59:14.0) :

Вы бы хоть вопрос корректно задавали ...

Если под "записать ./privet" Вы подразумеваете
"в файле names.log добавить в начало каждой строки
фрагмент ./privet", то тогда естественно:

$ perl -pi.bak -e 's/^/\.\/privet /' names.log

Есле же Вы подразумевали под этим "как мне записать
результат работы в файл ./privet", то:

$ perl -pe 's/^/privet /' names.log > ./privet

Может таки man perl поможет ?

Илья.

anonymous
()

а можно и без перла: cat ./privet | awk '{printf "priver $1\n";}'

cbax
()

Дык можно и без awk, используя sed, но я не знаю, как :-)

justme
()

cat names.log | sed -e 's/^/\.\/private /'

anonymous
()

А зачем канал использовать если можно так
sed -e 's/^/\.\/private /' < names.log
Непонятно зачем все это да еще на Перл. Что за задача такая

Korwin ★★★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.