Posted By: sinuhet (Cannot find entry for vi) on 'CZprogram'
Title: Re: Mezery a PERL.
Date: Mon Aug 17 17:19:25 1998
> Nazdarek.
> Potreboval bych poradit. Mam cislo ve tvaru 2 435.34 a to potrebuju pomoci
> regulerniho vyrazu prevzit jako cislo 2435.34. Delam to takhle :
> $kur = (@r[9]=~/([0-9,.]+)/) ? ($1) : (0);
^^^^^^^^^^^ tohle nezahrne mezeru -> $1 se vezme
jen do prvni mezery (navic je tu jedna
zavorka navic)
> ale to vezme akorat cele cislo. Pokud je v nem mezera tak ne. Potreboval
> bych
> bud aby bral i mezery, nebo mezery z retezce zrusit.
> zkousel jsem :
> $xx =~ tr/s//; i
> $xx =~ tr/ //; , ale nefunguje nic.
operator tr dela implicitne "preklad", nikoliv vymazani,
zkus:
$xx =~ tr/s//d;
> Libor Vejpustek
honza