Dotaz: tisk od-do s podminkou

[Terka]

---------------
obsah souboru:




# komentare nevim na kterem radku zacinaji
# komentare
# komentare ani kolik radku jsou dlouhe

prikazy prikazy prikazy prikazy prikazy 
prikazy prikazy 
prikazy 
prikazy 


# komentare

prikazy # komentare
-------------------

jak vytisknu prvni komentare? 
tj. tiskni vsechny radky zacinajici #
kdyz uz radek nezacina # skonci

nejlepe pomoci sedu nebo shellu

Odpovědi

[Pavel1]

Tedy jestli jsem to pochopil dobře (možná to půjde i jednodušeji) :

$ sed -n "/^#/,$ p" soubor.txt | sed "/\(^[^#]\)\|\(^$\)/,$ d"
# komentare nevim na kterem radku zacinaji
# komentare
# komentare ani kolik radku jsou dlouhe

[ams]

sed '/^\([^#]\|$\)/Q' soubor.txt

[ams]

Nevim, jestli jsou na zacatku souboru prazdne radky a jestli je treba takove radky tisknout. Predchozi reseni predpoklada, ze prazdne radky tam nejsou. V opacnem pripade staci jenom

sed '/^[^#]/Q' soubor.txt

[Terka]

jsou tam prazne radky a nechci je tisknout

[Pavel1]

Jenom tento jeden sed nestačí, alespoň ne u mne. Tobě to dávalo korektní výsledek? Takto to už vyhovuje podmínce zadání (Tvůj sed jsem dal místo mého druhého sedu):

$ sed -n "/^#/,$ p" soubor.txt | sed '/^\([^#]\|$\)/Q'
# komentare nevim na kterem radku zacinaji
# komentare
# komentare ani kolik radku jsou dlouhe

[Terka]

diky, tohle chodi :))

[Hynek (Pichi) Vychodil]

Jedním sedem:

sed -n '/^#/,${/^\([^#]\|$\)/Q;p}'

[Jan Martinek]

Já vím, mělo to být v sedu, tak si tohohle nevšímejte:

#!/usr/bin/env python
found = False
for line in file('soubor.txt'):
    line = line.strip()
    if line.startswith('#'):
        print line
        if not found: found = True
    else:
        if found: break

[Hynek (Pichi) Vychodil]

perl -ne '/^#/..eof and (/^(?:[^#]|\s*$)/ and last or print)'