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-

[EMAIL PROTECTED] wrote:
> 
> Hi,
> 
> I want to parse some input like this:
> "www.somewhere.com&blah-blah"    OR
> "www.somewhere.com-extrapathbit&blah-blah".
> 
> How can I parse up to the hyphen (if it's there) making sure it's before
> the ampersand?
> The ampersand tells me it's the end of the url. So I don't want to parse
> all the way thru "blah".
> 
> My two outputs should be, respectively:
> "www.somewhere.com" ""    OR
> "www.somewhere.com" "extrapathbit"
> 
> Please help!
> 
> Anton.

Reply via email to