Re: sed: remplacer les dernieres lignes de fichiers par un mot...

[Arnaud Delobelle <arnodel@googlemail.com>]

Jacques L'helgoualc'h <lhh+no_spam@free.fr> writes:

> Kevin Hinault a écrit, mardi 23 décembre 2008, à 17:50 :
>> Le 23 décembre 2008 17:05, Daniel Caillibaud <ml@editionsdidier.com> a écrit
>> :
>> 
>> > Jacques L'helgoualc'h a écrit :
>> >
>> >> Daniel Caillibaud a écrit, mardi 23 décembre 2008, à 10:15 :
>> >>
>> >>> njko a écrit :
>> >>>
>> >>
>> 
>> Juste parce que ça m'amusait de le faire en perl :
>> 
>> $ perl -e 'while(<>){$i++;push(@buf,$_);print shift(@buf) if($i>25);}'
>> lefichier
>> 
>> J'écoute toute améliorations bien sûr ;)
>
> perl -e 'while(<>){push@b,$_;print shift@b if++$i>25}print"Le mot de la fin\n"'

Version lisible:

$ python -c "import sys
acc = []
for line in open(sys.argv[1]):
    acc.append(line)
    if len(acc) > 25: print acc.pop(0)
print 'Le mot de la fin'
" monfichier

;)

-- 
Arnaud