Problem se splitem

[Ludek Finstrle]

> mam retezec $ret='/usr/bin/perl';
> chci jej rozdelit na '/usr/bin' a 'perl'
> pri pouziti
> ($nic, $cesta, $soubor) = split ('(.*)/(.*)',$ret) ;
> 
> se mi to povede , ALE musim pouzit promennou $nic
> kam se mi nacpe nejaky prazdny retezec.
> 
> Jak napsat ten reg. vyraz abych mohl napsat jen
> 
> ($cesta, $soubor) = split (reg_vyraz,$ret) ;  ???

Ted jsem nepochopil naco split :o(
Jinak je to jasne. Poprve vam to rozdeli na '', 'usr/bin/perl'
a podruhe na 'usr/bin','perl'.

Ale proc to neudelate

if (m!(.*)/([^/]*)!) {
  $cesta = $1; $soubor = $2;
}

Toto se mi zda daleko hezci nez ten split.

Luf