• see also:
• parse//url [1/2]
• || [help]

[REBOL] small parse problem Re:

From: joel:neely:fedex at: 16-Sep-2000 9:42

Hi, Anton!

I think this does what you want.

    >> chopurl: func [s [string!] /local part1 part2 urlchopper] [
    [    urlchopper: [
    [        [
    [            copy part1 to "-" skip copy part2 to "&"
    [            |
    [            copy part1 to "&" (part2: copy "")
    [            ]
    [        to end
    [        ]
    [    parse/all s urlchopper
    [    print [mold part1  mold part2]
    [    ]
    >> chopurl "www.somewhere.com&blah-blah"
    "www.somewhere.com" ""
    >> chopurl "www.somewhere.com-extrapathbit&blah-blah"
    "www.somewhere.com" "extrapathbit"
    >>

-jn-

[anton--globalcenter--net--au] wrote:

1 · [2] · 3 · 4 · 5 · See whole thread