10.01.2009, 00:55
|
|
Участник форума
Регистрация: 11.05.2007
Сообщений: 149
Провел на форуме:
6373157
Репутация:
247
|
|
Сообщение от MaTpOc
помогите плиз написать скрипт который бы удалял половину строки после символа ; включая его самого и складывал бы результат в отдельный файл..
Код:
$ cat test.txt
line1;aaaaa
line2;bbbbbb
line3;ccc
line4;dddd
$ perl -ne '/(.+)(;.+)(?{ print "$1;${\substr($2,int length($2)\/2)}\n" })/' file.txt
line1;aaa
line2;bbbb
line3;cc
line4;ddd
$
|
|
|