Re: [PERL] split

[Peter Makholm <sslug@sslug>]

"Christian Wix" <sslug@sslug> writes:

> Her kunne jeg tænke mig først at splitte på ":" og så på " ".

Enten så skal du udføre split to gange:

$foo = "Dette er strenge: 33 43 56 34:Lidt mere streng";
@tmp = split /:/, $foo;
@tal = split / /, $tmp[2];

Eller også skal du bruge et regulært udtryk:

$foo = "Dette er strenge: 33 43 56 34:Lidt mere streng";
@tal = $foo =~ /:\s*(?:(\d+)\s*)*:/;

Burde gøre det. Bemærk at (?:pattern) bruges til at lave parenteser
som ikke fanger indholdet.

Jeg ved ikke lige hvad der er hurtigst, men du kan jo prøve med
Benchmark-modulet.

-- 
 Peter Makholm     |     Have you ever felt trapped inside a Klein bottle?
 sslug@sslug |                                                      
 http://hacking.dk |