Dotaz: Jak pridat mezeru do retezce

[Stefan]

Zdravim, mam soubor s retezcema jak:

P41PR
SP62TZ
P24LS
P25NR
P112HX
P26HU
SP36BU
SP1V4JD

a potrebuju je upravit aby ctvrty znak od konce byla mezera.

P4 1PR
SP6 2TZ
P2 4LS
P2 5NR
P11 2HX
P2 6HU
SP3 6BU
SP1V 4JD

Muzete me nakopnout jak to udelat se sed-em? Predem diky.

Odpovědi

[#Tom]

Já bych sed nebral:

while read line; do
    echo ${line:0:${#line}-3} ${line:${#line}-3}
done

Kontrolu pro příliš krátké řetězce si už doplníte sám.

[Jakub Hájek]

sed 's/\(^.*\)\(...$\)/\1 \2/' soubor_s_tema_kodama

[szafa]

Dekuji, funguje to nadherne.

[Hynek (Pichi) Vychodil]

Proč tak složitě?

sed 's/\(...\)$/ \1/'

[Jiří Poláček]

sed -e 's/\(.*\)\(...\)$/\1 \2/' soubor

[Jan Martinek]

one-liner v pythonu:

file('soubor2', 'w').writelines(([a[:-4]+' '+a[-4:] for a in file('soubor')]))

Fůůůůj

[Kyosuke]

A vida. Čekal jsem, kdy se ozvete. Koukám poslední dny, že máte tendenci cpát pythonovský kód do každé druhé věty. Nicméně si nemyslím, že je dobrý nápad použít k tak triviálnímu úkolu nástroj, který se na cílovém stroji nachází s menší pravděpodobností než stream editor. On se ten kód v Pythonu musí taky nějak spustit, že? Takže to pak bude dalších dvacet zbytečných znaků navíc.

Kanónem na vrabce, toť motto dnešního světa...zdravý rozum a "use the right tool" dostává na frak...

[Jan Martinek]

Jojo. A jestli vám to nebude vadit, budu to tak dělat i nadále. Já bych to tak nedramatizoval. Mám pro to své důvody, o kterých se můžeme nazdařbůh pohádat někde v blogu. Myslím, že je to ale zbytečné, protože výhody a nevýhody pythonu versus (bash + awk + sed + find + xargs + tr + test + bc + ...) jsou celkem evidentní. Buďte bez obav - nejsem blázen, abych si myslel, že python je vždy nejlepší.

Příklady z abclinuxu si s oblibou (pro své vlastní potěšení) píšu v pythonu, abych se něco naučil. No a místo abych výsledek zahodil, tak ho raději pošlu sem.

No a v tomto konkrétním případě jste určitě mohl vymyslet lepší důvody pro kritiku než počet znaků zdrojáku či "pravděpodobnost dostupnosti nástroje".

[Kyosuke]

"No a v tomto konkrétním případě jste určitě mohl vymyslet lepší důvody pro kritiku než počet znaků zdrojáku či "pravděpodobnost dostupnosti nástroje"."

Já bych to nebral tak úplně na lehkou váhu. V době, kdy se rozmáhají "chytré krabičky", do kterých si lidé cpou speciální distribuce, je třeba mít se na pozoru, řekl bych. A na IRIXu a Solarisu mi to taky bude k ničemu, pokud se nerozhodnu stáhnout si extra binárky z nekochan.net nebo něčeho podobného pro Solaris. Na dvou třetinách strojů doma Python nemám, protože na nich potřeba nebyl, a kdybych potřeboval jenom přidat mezeru do sloupce, těžko bych ho kvůli tomu instaloval. Kdybych tam rozhcházel třeba CherryPy, samozřejmě bych těžko mohl jinak, ale kvůli mezeře do souboru?

Pokud jde o "počet znaků", prostě mi uchází, proč to dělat složitě, když to jde jednoduše, nástrojem přesně k tomuto účelu zamýšleným.

[happy barney]

na python odpovedat jedine perlom )
(suhlasim s tym, ze pouzitie sedu je v tomto pripade spravne)

perl -ne 's/(?<=...)$/ /; print'

[Kyosuke]

„perl -ne“

Ano, tak s tím nelze nesouhlasit. Perl opravdu ne.

[#Tom]

Když už v něčem mohutném, tak to už snad raději v céčku.

[Hynek (Pichi) Vychodil]

Špatně!

perl -pe 's/(?=...$)/ /'

[happy barney]

dik, tu zlu zatvorku som si neuvedomil

[Jan Martinek]

"No a v tomto konkrétním případě jste určitě mohl vymyslet lepší důvody pro kritiku než počet znaků zdrojáku či "pravděpodobnost dostupnosti nástroje"."

Já bych to nebral tak úplně na lehkou váhu. V době, kdy se rozmáhají "chytré krabičky", do kterých si lidé cpou speciální distribuce, je třeba mít se na pozoru, řekl bych.

Kdybyste navrhoval embedded zařízení, dáte tam raději _jeden_ nástroj (python - viz například mobil nokia S60)
http://www.forum.nokia.com/python
Nebo raději sed a spoustu dalších utilit, které se musí nějak sešroubovat, aby to fungovalo?

A na IRIXu a Solarisu mi to taky bude k ničemu, pokud se nerozhodnu stáhnout si extra binárky z nekochan.net nebo něčeho podobného pro Solaris. Na dvou třetinách strojů doma Python nemám, protože na nich potřeba nebyl, a kdybych potřeboval jenom přidat mezeru do sloupce, těžko bych ho kvůli tomu instaloval.

To, že jste se rozhodl nenainstalovat python je pouze vaše osobní věc. Nic to nevypovídá o obtížnosti instalace, dostupnosti nebo použitelnosti.

Kdybych tam rozhcházel třeba CherryPy, samozřejmě bych těžko mohl jinak, ale kvůli mezeře do souboru?

Viz výše,

Pokud jde o "počet znaků", prostě mi uchází, proč to dělat složitě, když to jde jednoduše, nástrojem přesně k tomuto účelu zamýšleným.

Takže čím méně znaků, tím je to podle vás jednodušší? Pak nechápu, proč se tak distancujete od mocného Perlu
Na první pohled se může zdát, že specializovaný nástroj = rychlý nástroj. Ale sed pokulhává i tomto směru:

$ time sed -e 's/\(...\)$/ \1/' soubor > /dev/null 

real    0m38.281s
user    0m37.978s
sys     0m0.212s

$ time ./pridej_mezeru.py > /dev/null 

real    0m27.808s
user    0m27.582s
sys     0m0.128s

Perl by pravděpodobně ve všem zvítězil, ale bohužel je tam nějaká chyba a já to nedákážu ani přečíst, natož opravit.

[happy barney]

oops, to mam z toho, ze pisem regexpy bez testovania a hladny

perl -ne 's/(...)$/ $1/; print'

ale nefandil by som mu, regexp bude pomalsi ako priame vypisovanie retazca, co by mohlo byt nasledovne

perl -ne 'substr $_, -4, 0, " " if length  > 4; print'

[Jan Martinek]

Jojo, ty (nepředkompilované) regulární výrazy ho dost zdržují:

$ time perl -ne 's/(...)$/ $1/; print' soubor > /dev/null 

real    1m4.121s
user    1m0.340s
sys     0m0.192s

Ale ten druhý případ dává perlu jasné vítězství:

$ time perl -ne 'substr $_, -4, 0, " " if length  > 4; print' soubor > /dev/null 

real    0m14.447s
user    0m13.433s
sys     0m0.236s

Proti perlu nemám s Pythonem šanci. Především proto, že čitelnost kódu nelze měřit

[Hynek (Pichi) Vychodil]

Zase těch zbytečností okolo

perl -pe 'substr$_,-4,0," "if length>3'

[Kyosuke]

Vida! Mohl bych, prosím pěkně, dostat zdrojový kód obou textů a ten soubor nebo jeho generátor, třeba zapakované? Mohl bych to vyzkoušet s jednou zajímavou knihovnou a přesvědčit se, jak je opravdu rychlá... Tedy jinak řečeno, přidat ještě jedno řešení.

"To, že jste se rozhodl nenainstalovat python je pouze vaše osobní věc. Nic to nevypovídá o obtížnosti instalace, dostupnosti nebo použitelnosti."

Jde o to, že regulární výraz pro sed napíšu po zralé úvaze za půlminutu. Sehnání a instalace Pythonu se mi za půlminutu nepovede.

Od Perlu se nedistancuju, to byl jen vtip. Nicméně přeci jen upřednostňuju méně terse řešení pro velké věci, ale pro takovou drobnost mi zápis sedu přijde jako "just right". Je to asi subjektivní, ale pokud vidím

sed 's/\(...\)$/ \1/'

a snažím se přijít na to, co dělá konkrétního (že sed zpracovává stream, je mi jasné, je to stream editor), mám 75 % textu věnovaného konkrétnímu problému. Kdežto tady

file('soubor2', 'w').writelines(([a[:-4]+' '+a[-4:] for a in file('soubor')]))

je ta nejpodstatnější část ([a[:-4]+' '+a[-4:]) ukrytá v cca. 16 % textu a nejprve se musím prolouskat tím, co ten obecný interpret má v tomhle konkrétním případě vlastně momentálně má za úkol. Jistě, je to ovlivněno psychologií, aktuálními znalostmi jednotlivých nástrojů a vůbec je to subjektivní, ale předpokládá, že v tomhle nebudu sám.

[Jan Martinek]

Vida! Mohl bych, prosím pěkně, dostat zdrojový kód obou textů a ten soubor nebo jeho generátor, třeba zapakované? Mohl bych to vyzkoušet s jednou zajímavou knihovnou a přesvědčit se, jak je opravdu rychlá... Tedy jinak řečeno, přidat ještě jedno řešení.

Jasně, s tím generátorem jsem moc na veřejnost jít nechtěl, ale tady je

file('soubor', 'w').writelines('pepazdepa\n' * 10000000)

A testoval jsem to myslím tímhle:

#!/usr/bin/env python
import sys
for line in file('soubor'):
    sys.stdout.write(line[:-4] + ' ' + line[-4:])

Je to trochu pomalejší než ten one-liner, který jsem poslal předtím (ten prosím nepoužívat), ale zase to nesežere všechnu paměť

Chápu to správně, že se můžeme těšit na ukázku ruby?

[Kyosuke]

Kdepak, něco o dva řády rychlejšího. Jakmile se večer dostanu k stroji s nějakým unixem...

[happy barney]

skor by som to odhadol na nejaky lisp (zeby emacs-lisp?)

[Kyosuke]

(Pšššt, neříkej jim o PPCRE... )

[Michal Karas]

Taky bych byl zvědavý na nějakou efektivní ukázku ruby. Zkoušel jsem:

ruby -ne 'print $_[0..-5]+" "+$_[-4..-1]' soubor

a:

#!/usr/bin/ruby

f = File.new("soubor")
f.each { |line| line.sub!(/(...)$/,' \1'); puts line}
f.close

ale obě varianty rychlostně hodně zaostavají za sedem, perlem i pythonem.

[Pavel1]

Nenech se odradit a klidně uváděj i příklady řešení v pythonu! Těch pár příspěvků navíc tady vůbec nevadí, ba naopak. Že to pokaždý v pythonu nevychází "nejefektněji", to zde pozná každý. Ale o to přeci nejde, každý si může vybrat to "své" řešení, hlavně když je z čeho vybírat. Já třeba python (zatím) neovládám, ale vždycky se rád podívám, jak to v něm vypadá. A pokud s tím člověk začíná, tak právě takovéto jednoduché vyřešené úlohy jsou v začátcích výborným vodítkem. To je můj názor a předpokládám, že nejsem jediný. Jen víc takovýchto příkladů a návrhů řešení! Kdyby i jiní, co ovládají další jazyky (třeba Perl), přidávali také příklady, bylo by to ještě lepší!

[Hynek (Pichi) Vychodil]

Dlouhe, neohrabané, hloupé. Nejde to použít jako filtr a je to neflexibilní.

[Hynek (Pichi) Vychodil]

Jinak srovnání rychlostí mluví samo za sebe

$ time perl -pe 'substr$_,-4,0," "if length>3' test.txt > /dev/null

real    0m0.070s
user    0m0.050s
sys     0m0.000s
$ time python pridej_mezeru.py 

real    0m0.101s
user    0m0.090s
sys     0m0.010s
$ time perl -pe 's/(?=...$)/ /' test.txt > /dev/null

real    0m0.365s
user    0m0.360s
sys     0m0.000s
$ time sed 's/\(...\)$/ \1/' test.txt > /dev/null

real    0m0.522s
user    0m0.500s
sys     0m0.000s

[Hynek (Pichi) Vychodil]

Pro doplnění

$ time sh pridej_mezeru.sh <test.txt >/dev/null

real    0m4.153s
user    0m3.020s
sys     0m0.100s

[happy barney]

naco tam trepete cely retazec? predsa staci hladat od konca

sed -e 's/\(...\)$/ \1/'

mimochodom, ako sa to ma chovat, ak na riadku su menej ako tri znaky ?