Dotaz: nahrazení začínajících mezer značkami nbsp

[RM]

Nějaký nápad jak nahradit mezery v textu na začátku, třeba značkami (&)nbsp, za pomocí sedu?? Já zatím vymyslel tohle:

echho " Dobrý den, " | sed 's/^/ł/ ;:a;s/ł /łł/;ta;s/ł/\(&)nbsp;/g'

(&)=&
, kde si musím pomoct znakem, který se v textu s největší pravděpodobností nebude vyskytovat. Možná to ale jde i nějak méně krkolomně.

Odpovědi

[blondak]

Třeba

echo "  Dobrý den, " | sed ':a;s/^\([[:space:]]*\)[[:space:]]/\1\ /;ta'

?

[RM]

pěknýýý, to je přesně ono. A nebylo by k tomu ještě krátké vysvětleníčko toho reg. výrazu.

[RM]

jen pozor na tu mezeru na konci, s tou se to zacyklí

[RM]

ach so, ono se to tam vkládá od poslední mezery. Takhle je to už jasné:

echo "  Dobrý den, " | sed ':a;s/^\([[:space:]]*\)[[:space:]]/\1\./;l;ta'

díky

[RM]

ani by mne nenapadlo, že to využiju ještě i k odbešení skriptu, kde potřebuju odseknout nuly na začátku (z 00030 dostat 30); už několikrát jsem nad tím dumal. Bash na to má tohle ${num##+(0)}, ale musí se nastavit shopt -s extglob, je to je hnus. Takhle je to lepčí:

echo 0030 | sed ':a;s/^\(0*\)0/\1/;ta'

dvojitá radost :), ať žije sed

[pet]

Hmmm, a co je špatně na:

echo 0030 | sed 's/^0*//'

[RM]

jasný... byl jsem až příliš unešen tím kouzlem (:a ta) a navíc jsem měl na paměti nefunkční obdobu bashovské substituce (tam to takhle nejde), to byl asi hlavní důvod, proč jsem hned skočil po kanónu; třeba vás napadne ještě nějaké jednodušší řešení i pro první případ?

[pet]

Úvodní nuly v bash:

$ a=0030
$ echo $((10#$a))
30
$

A to nahrazování úvodních mezer moc elegantně nejde právě proto, že je to nahrazování.

[RM]

zajímavé, tohle jsem v bashi neznal

[Andrej]

A kdyby bylo zakázáno spouštět jakékoliv další procesy kromě Bashe, pak by se to dalo zařídit třeba takhle:

while IFS='' read line; do index=0; while [[ ' ' = "${line:index:1}" ]]; do ((++index)); echo -n ' '; done; echo ${line:index}; done

Ale nemusí to být za každou cenu one-liner.

while IFS='' read line; do
    index=0
    while [[ ' ' = "${line:index:1}" ]]; do
        ((++index))
        echo -n ' '
    done
    echo ${line:index}
done