[EMAIL PROTECTED] wrote:
>
> [EMAIL PROTECTED] wrote:
>
> > [EMAIL PROTECTED] wrote:
> > >
> > > Say folks: I put up an article I wrote this weekend on using
> > > REBOL with the unix shell. It's a part of some other domain specific
> > > REBOL materials I've been assembling. Have a look and please feel
> > > free to send me any feedback you have.
> > >
> > > http://www.cs.unm.edu/~whip/rebol-unix-shell.html
> >
> > 3000 chars on your ~whip/index.html cute :)
>
> hmm, not so sure :-)
>
> >
> > REBOL [
> > Title: "Count"
> > Date: 12-Jun-2000
> > Author: "Deryk Robosson"
> > Email: [EMAIL PROTECTED]
> > Purpose: {
> > Count the width of Jeff's site.
> > }
> > ]
> >
> > res: parse read http://www.cs.unm.edu/~whip/ "0"
>
> wrong imho - above line tries to parse the string by "0" char. The result
> is:
I just found the common item and used parse to count it.
> ->> res: parse read http://www.cs.unm.edu/~whip/ "0"
> == ["123456789" "123456789" "123456789" "123456789" "123456789" "123456789"
> "123456789" "123456789" "123456789" "123456789" "1
> 23456...
>
> so 3000 of the same items ... hmm, what's that? :-))
> ha, now i got it - it's different page, you surely wanted to grab following
> one: http://www.cs.unm.edu/~whip/rebol-unix-shell.html
>
> > i: 0
> > foreach result res [
> > i: i + 1
> > ]
> >
>
> second, - you don't need to do such counts, rebol is much smarter -
> "length? res" will return the same ...
>
> > print rejoin [i " chars wide."]
>
> I told you rebol is much, smarter, no? :-) "print [i "chars wide"]"
>
> so, just one line:
>
> print [length? res: parse/all read
> http://www.cs.unm.edu/~whip/rebol-unix-shell.html " " "chars wide"]
>
> Kapito? :-)
Much neater hehe I had a general idea it could be condensed quite a bit
but didn't realise how much. :)
Regards,
Deryk
