A couple of possibilities to check out below.

str: copy "azertyuiopqsdfghjklmwxcvbnazertyuiopqsdfghjklmwxcvbn"

string-split-up1: function [
    string [string!] n [integer!]
][result subrule][
    if lesser? n 1 [return none]
    result: make block! divide length? str n
    subrule: compose [1 (n) skip]
    parse/all str [any [copy text subrule (insert tail result text)]]
    result
]

string-split-up2: function [string [string!] n [integer!]][result][
    if lesser? n 1 [return none]
    result: make block! divide length? str n
    forskip string n [insert tail result copy/part string n]
    result
]

string-split-up1 str 5

If your string/list is very long you might wan't to avoid making the block
(or list) in order not to waste time with memory allocations.

Regards,
Brett.

----- Original Message -----
From: "COFFRE Richard FTO" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, April 15, 2002 7:24 PM
Subject: [REBOL] Tip for splitting very long string ?


Hi Rebol fellows,

Is there a tip to quickly split a very long string more than 2000 characters
into n characters sub strings and to create a list with these subsets ?
For instance :

str: copy "azertyuiopqsdfghjklmwxcvbnazertyuiopqsdfghjklmwxcvbn"

I want to split this string into substrings of 5 characters to have

a-list: [ "azert" "yuiop" "qsdfg" "hjklm" ...]


TIA

Richard Coffre
France Telecom Orbiscom
T�l. : 01 47 61 46 28


--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.


-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to