Problem se splitem
Honza Pazdziora
adelton na informatics.muni.cz
Středa Duben 19 12:06:33 MEST 2000
On Wed, Apr 19, 2000 at 11:42:54AM +0200, Jaromir Bosko wrote:
> Zdravim,
>
> 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) ; ???
Nepouzivejte split:
my ($cesta, $soubor) = ($ret =~ m!^(.*)/(.*?)$!);
Tim splitem se to samozrejme taky da, napriklad s lookaheadem, ale
pouziti matchovani v seznamovem kontextu je mnohem cistsi.
--
------------------------------------------------------------------------
Honza Pazdziora | adelton na fi.muni.cz | http://www.fi.muni.cz/~adelton/
.project: Perl, DBI, Oracle, MySQL, auth. WWW servers, MTB, Spain.
------------------------------------------------------------------------
Další informace o konferenci Perl