подскажите пожалуйста как можно поднять строку вверх в текстовом файле.????

101:1:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:
101:2:569959:11550:10923:9322:8861:10675:11435:13200:12375:10758:13810:13794:12441:13530:13398:11550:10874:10593:10411:10775:13398:13233:12094:13629:9158:6880:8993:10510:12078:14207:11946:10725:10279:11072:10939:11765:13728:13150:14207:13200:13629:10906:10362:12359:13480:14256:13217:13876:12408:
101:3:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:
101:4:377272:8200:7524:6600:6171:7310:7854:8679:8250:7293:9174:9504:8332:9174:9306:7640:7260:6864:6600:6583:8630:8646:7953:8778:6237:4851:5692:6782:7474:8960:7540:6864:6419:6913:6320:7392:8481:8629:9372:9471:9389:7441:6452:7689:9223:9768:9174:9603:8811:
102:1:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:0:
 надо поднять всё на одну строку вверх!!!

напишите более понятно

есть текстовый фаил. но врезультате замены остается пустой первая строка и мне нужно поднять все строки на одну вверх  в место образовавшейся пустой!!!))))

perl -i -ne "print if $. != 1" file.txt

А лучше замену выполнить так, чтобы убирать ничего не нужно было.

Это сообщение отредактировал(а) amg - 14.12.2009, 11:10

amg, У МЕНЯ ЗАМЕНА  s/^\(\(\/\/(\d+):(\d+):(\d+):\+\+//
КАК ПРИМЕНИТЬ ТО ЧТО ТЫ НАПИСАЛ???

s/^\(\(\/\/(\d+):(\d+):(\d+):\+\+.*//s;

amg,  СПАСИБО помогло!!!!)))))))))))