RE
Ludek Finstrle
luf na gvid.cz
Pátek Prosinec 6 01:52:02 MET 2002
> coz delalo prvni cas, tedy dopsalo mezeru mezi cislo a pismeno. Kdyz
> jsem ale pouzil
>
> s/([[:digit:]]+)([[:alpha:]]+)|([[:alpha:]]+)([[:digit:]]+)/$1 $2/g
>
> obdrzel jsem hlasku:
>
> Use of uninitialized value in concatenation (.) or string
Problem bych vydel, ze kdyz se matchne podle toho za |, tak
$1 a $2 neni naplneno (undef) a je naplneno jen $3 a $4.
> Jak na to? Potrebnju to v jednom s///, protoze to vyhodnocuji ve
> pravdivostnim kontextu...
A co zkusit:
(s/([[:digit:]]+)([[:alpha:]]+)/$1 $2/g ||
s/([[:alpha:]]+)([[:digit:]]+)/$1 $2/g);
??
Luf
Další informace o konferenci Perl