World: r3wp

Don't worry about that email address. It was a temporary one I created 
for test purposes.

Hmm.. I don't know the correct terminology, so I can't explain what 
I mean very well...

>> smtp: open/lines tcp://bible-way.org:26
>> insert smtp "HELO Louis-here"
>> probe copy smtp
** Access Error: Network timeout
** Near: probe copy smtp


SMTP ports stay open while data is transferred back and forth.  Copy 
doesn't return until the port is closed - so in the above line, copy 
is waiting until the server closes SMTP, and the server is waiting 
for a command from the client.


It's the reason why (as I understand it) Grahams "pick smtp 1" worked, 
but copy did not - SMTP was still open, even though there was data 
for the client to read.  (I was stuck on that myself for a long time 
 ;-)

Oldes, that worked! Many thanks. I would probably have never figured 
that out by myself.

Izkata, thanks. I am learning many things today.

Henrik: "Oldes: great, now louis email address is webpublic :-)"

No more so than by right-clicking on his name in the thread :-)

Oops I  forgot about the web-public stuff!!!

Which is fastest/best?      

y
 <> ch-db/2/drop

or 

ch-db/2/drop <> "y"

Or does it make any difference?

with the constant first it does not have to decide/figure out the 
type of  'drop

should minutely  quicker

just be careful though, because you may end up compariing a 1 char 
string! vs a char! , you might not get the result you expect
y
 <> #"y"
== true

Thanks, Tomc and Allen. And Allen, I didn't realize that. Thanks 
for the warning!

To test performance of some code, you can use this function:

time: func [:f /local t] [
	t: now/time/precise
	do f
	now/time/precise - t
]

Example:
>> time [loop 100000 [ch-db/2/drop <> "y"]]
== 0:00:00.34105

Btw. performance-wise the 2 ways look equal good.

Thanks, Geomol!

I recommend using time-blk.r from Ladislav it does multiple measurements 
until the measurement error is below supplied threshold.

Thanks Jaime, I'll check that out.

is it possible to change file permissions via FTP with rebol?

YEs.

We need to yell at Dan, and get him to post the source to FTPGadget. 
 It has examples of just about everything for FTP.

I truly don't even know what is holding that up.

that would be nice

I bitched at Cal and Dan.  I think there is nothing holding them 
up.  At one point it was that the code only ran on 1.2.5, so they 
should post this in the next few days.

put it in their Qtask queue ...

It is, but since it is not a priority it can't be given a deadline.

In fact, if you are part of the Qtask Contractors project, you can 
read everyone's tasks.

is there an easy way to print numbers with thousands separators? 
I seem to keep resorting to complex solutions that not always work.

printf ?

This may help http://www.rebol.org/cgi-bin/cgiwrap/rebol/ml-display-message.r?m=rmlVVYS

Found via the ML Topic Index under format/numbers with commas

great! thanks

quite a bit of code there. hopefully my suggestion for EXTRACT for 
REBOL3 will be accepted :-) that would make this a whole lot simpler

oh, works only on integers :-(

graham, I looked at printf and it seems to require a DLL interface?

I don't think that printf will insert comma separators from looking 
at the man page.

I have this:

>> form-decimal 10 0
== "10"
>> form-decimal 10 2
== "10,00"
>> form-decimal 100000 2
== "100'000,00"
>> form-decimal 100000 0
== "100'000"

very old... result is rebol loadable

not sure code is readable... but if you want to play with it anyway...

that looks good

as long as it's readable to rebol :-)

$ echo "1234567890" | perl -pe '1 while s/(.*)(\d)(\d\d\d)/$1$2,$3/'
   1,234,567,890

http://www.sunmanagers.org/pipermail/summaries/2002-December/002817.html
and there's an awk script on the same page

Try this thread, which includes a version of Gabriele's form-decimal 


http://www.rebol.org/cgi-bin/cgiwrap/rebol/ml-display-thread.r?m=rmlLTLK

All the versions are quite long though.

gabriele's solution works fine here :-)

Did you notice the ; ***WARNING*** positive numbers only.

the version i sent him is the older, more generic one, which uses 
italian rules for formatting (, to separate decimals, ' to separate 
groups of 3 digits)

graham, the above regexp can be written in parse as:

digits: charset "1234567890" reverse rewrite reverse "1234567890" 
[[x: 4 digits] [(copy/part x 3) "," (pick x 4)

using my rewrite function