[REBOL] The Industry Needs REBOL But Thinks it Wants Perl

2000-09-20 Thread princepawn
As I'm sure you all know, if you type rebol as a keyword into any jobsearch engine you will find no jobs anywhere. The situation with Perl is quite the opposite. Here at work, I had just finished up a slick REBOL script to do encrypted ftp file transfers that was 1/4th the size of the legacy Pe

[REBOL] reform, rejoin and separation characters

2000-09-19 Thread princepawn
Been awhile since I have been able to chew the fat with my fellow rebols, but please correct me if I am wrong, but it seems that rejoin is a reform where the separation character is the empty string as opposed to the space. That being the case, why not simply one function with different refinem

[REBOL] use should have use/strict

2000-09-15 Thread princepawn
I would like a refinement to use (use/strict) which balks if any words are defined within the block which were not pre-declared in the header. terrence-brannon: [[EMAIL PROTECTED] perl-refugee myth-gamer] free-email: http://www.MailAndNews.com free-usenet: http://www.mailAndNews.com ;

[REBOL] checking for localhost versus remote host

2000-09-15 Thread princepawn
I am writing a script and I only want the trace info created and logged if the script is running on a remote machine, not my own. Is there a programmatic way to check for what machine my script is running on? terrence-brannon: [[EMAIL PROTECTED] perl-refugee myth-gamer] free-email: http:/

[REBOL] best means of passing refinements from main to helper function?

2000-09-15 Thread princepawn
I want to know the best way to propagate refinement selections (or their lack) to a function which actually does the processing for them. deduction: func [/use-month month-to-use /use-day day-to-use] [ rejoin [ "file-" either use-month [ month-to-use ] [ now/mont

[REBOL] another parsing problem: converting dos filenames to rebol

2000-09-15 Thread princepawn
Could someone please fix this? It hung my interpreter: REBOL [ Title: "DOS-REBOL File Name Conversion Routines" File: %dosbol.r Author: "Terrence Brannon" Email: [EMAIL PROTECTED] Purpose: "Ease working with dos filename in REBOL programs" Categor

[REBOL] use strict

2000-09-15 Thread princepawn
I posted much earlier that I would like to see use/strict, which would not allow the definition of any words that are not pre-declared. Of course then rebol would need scoping syntax for binding words out of the context terrence-brannon: [[EMAIL PROTECTED] perl-refugee myth-gamer] free-email:

[REBOL] finding balanced occurences of two words... help needed

2000-09-15 Thread princepawn
REBOL [ Title: {Unbalanced set and reset commands alert function. Prints a warning when a file contains an unbalanced number of setsize and resetsize commands. Right now, for some reason, it only seems to count the resetsize text and not increment set-cmds... }] study-file: func

[REBOL] 5 simple pattern matching questions

2000-09-14 Thread princepawn
I am having problems switching my understanding of regular expressions to the REBOL parse dialect. Could someone please tell me how to do each of the following with parse? 1. match "cat" at the beginning of a line 2. match "cat", immediately preceded and followed by a word boundary , e.g., mat

[REBOL] parse question Re:

2000-09-14 Thread princepawn
using thru did not result in correct parsing >= Original Message From [EMAIL PROTECTED] = >terrence-brannon wrote: >> rules: [ >> to "resetsize" (size-cmds: size-cmds - 1) >> | >> to "setsize" (size-cmds: size-cmds + 1) >> ] > >Try 'thru instead of 'to. > >Note that "setsize" is equal to

[REBOL] using set within the parse dialect

2000-09-14 Thread princepawn
Could someone provide a simple example of using the set word within the REBOL parse dialect? There was no example in the User's Guide. terrence-brannon: [[EMAIL PROTECTED] perl-refugee myth-gamer] free-email: http://www.MailAndNews.com free-usenet: http://www.mailAndNews.com ; all th

[REBOL] parse question

2000-09-14 Thread princepawn
In order to improve my skills with the REBOL parse word, I thought I would go through "Mastering Regular Expressions" by Jeffrey Freidl and do all the examples in REBOL. Here is my first attempt and it does not work. The script is supposed to take a list of files and indicate whether the word

[REBOL] read URL => error, exists? URL => false

2000-09-11 Thread princepawn
>> read ftp://1.1.1.1 connecting to: 1.1.1.1 ** User Error: Failed login to 1.1.1.1 as anonymous. Check your login. ** Where: read ftp://1.1.1.1 >> exists? ftp://1.1.1.1 connecting to: 1.1.1.1 == false >> is this a valid set of responses? Or, because there was a read error in both cases, should

[REBOL] read URL => error, exists? URL => false (SAMPLE CODE ATTACHED)

2000-09-11 Thread princepawn
>> read ftp://1.1.1.1 connecting to: 1.1.1.1 ** User Error: Failed login to 1.1.1.1 as anonymous. Check your login. ** Where: read ftp://1.1.1.1 >> exists? ftp://1.1.1.1 connecting to: 1.1.1.1 == false >> is this a valid set of responses? Or, because there was a read error in both cases, should

[REBOL] does REBOL run on Palm or not?

2000-09-11 Thread princepawn
I did not see a Palm release of REBOL/Core on the downloads page at rebol.com... does it only run on Palms and Handhelds in theory for the present time? If so, when is this going to become reality? Get your FREE Email and Voicemail at Lycos Communications at http://comm.lycos.com

[REBOL] How do I default automatically to yet on the "write on port" queries

2000-09-09 Thread princepawn
I am writing a non-interactive script and would like to forego the popup asking for permission to write on ports. How might I do this? Thanks! Get your FREE Email and Voicemail at Lycos Communications at http://comm.lycos.com

[REBOL] Trying to compose a block out of global and local bindings Re:(2)

2000-09-08 Thread princepawn
Oh my god. I think this is the most naive thing I have ever done in my life... I really didnt even think that I had just redefined form. This is so embarrassing. --- On Fri, 8 Sep 2000 0:05 +020 alex.pini wrote: >>- Open Your Mind -< > > > >Quoting from [EMAIL PROTECTED]'s message (07-Sep-0

[REBOL] Real, New, Request for FTP Proxy Help

2000-09-08 Thread princepawn
FACT ZERO: If I have to pay to get this working, then that is fine. FACT ONE: I can read remote FTP directories from behind my firewall via my Internet Explorer by simply entering the URL. The configuration for my proxy is achieved via a configuration file. http://planet.instinet.com/proxy.lon

[REBOL] printing a path and its value

2000-09-08 Thread princepawn
I want to print a path (ie, what the path is) and then the value of that path... how can I do so? diag: func [path-block [block!]] [ foreach p path-block [ prin p print " " print reduce p ] ] diag [ system/scheme

[REBOL] Trying to compose a block out of global and local bindings

2000-09-07 Thread princepawn
>> letter2: func [b /local name] [foreach n ["sally" "sue"][ name: n print reform >reduce b] ] >> form == ["hi" name "welcome back"] >> name == "bob" >> letter2 form hi bob welcome back hi bob welcome back ... the only problem is I was hoping that the loop values in letter2 would take preced

[REBOL] Error msg from write ftp:// is completely inaccurate

2000-09-07 Thread princepawn
>> write ftp://chuck:[EMAIL PROTECTED]/crossing/ndtd/chmod-file %user.r connecting to: 170.16.15.136 >> print read ftp://chuck:[EMAIL PROTECTED]/crossing/ndtd/ connecting to: 170.16.15.136 chmod-file file1 ofile rebol.r user.r ; --- then I telnet to server and chmod 000 chmod-file ; --- thus it is

[REBOL] if any [not suffixes find suffixes find/last file "." ] [ Re:(2)

2000-09-07 Thread princepawn
I think it makes sense now... but: how could I use a wildcard such as the find/any wildcard to find the file, e.g.: find/any file-list "*.r" --- On Thu, 7 Sep 2000 8:57:15 - johnkenyon wrote: > > >Hi again, > >Look at >>> help any > >Maybe more readable with extra brackets to emphasize

[REBOL] write does not return a value upon success. This is bad for try blocks

2000-09-07 Thread princepawn
I am writing a script that will try 3 times to write a file and then fail, however, I cant place a try block around the REBOL write statement because it does not return anything upon success, thus I get an error that the word is not bound: >> m: try [ write ftp://chuck:[EMAIL PROTECTED]/crossin

[REBOL] if any [not suffixes find suffixes find/last file "."] [

2000-09-07 Thread princepawn
I am trying to understand the following script and dont quite understand the mechanics of this line right here: if any [not suffixes find suffixes find/last file "."] [ I understand not suffixes completely I dont understand find suffixes find/last file "." at all suffixes is a block of suffix

[REBOL] Second request for help: globbing on a block of filenames

2000-09-07 Thread princepawn
I have a block which contains filenames. I would like to get a true or false value back indicating whether or not there is a filename in the block that terminates with a r~ extension. Please show me how to do this. >> a == [%cast.r %feedback.r %ftp.r %ftp.r~ %instinet.r %instinet.r~ %lconfig.r

[REBOL] How do convert binary and decompress compression?

2000-09-07 Thread princepawn
How do you convert binary back to ascii? How do you decompress something that is compressed? --- On Tue, 5 Sep 2000 11:31:11 ryanc wrote: >With REBOL you wont be too successful hiding this from a REBOL >programmer, because of course a properly placed probe would easily >reveal it no matter

[REBOL] find/any and a filename series does not intuitively glob

2000-09-06 Thread princepawn
I would like to know how to do wildcard searches on a series which contains filenames as its elements... >> e == [%%backup%~ %.autosave/ %.forward %.pgp/ %.rhosts %.saves-1309-crossftp3 %bin/ %crossing/ %dev/ %emacs-20.7.tar.gz %etc/ %test/ ... >> find e %etc/ == [%etc/ %test/ %user.r %usr/ %x

[REBOL] Speed and Memory Management in REBOL

2000-09-05 Thread princepawn
I was glancing at one of the most popular scripts at the REBOL archive and developed some questions: 1- Is it possible to incrementally write to a file in REBOL? 2- Is it possible to append to a file in REBOL 3- This script seems in-efficient and memory wasteful: it reads and entire file into a

[REBOL] GET vs. POST Re:

2000-09-05 Thread princepawn
I cant imagine why it matters whether input is GET or POST... either way you want to pick the values out of a query string... in Perl, the CGI.pm module allows you to get at key-value pairs regardless of whether the data was sent via GET or POST, and I for one have never cared how it came as lo

[REBOL] trace should be sendable to a file

2000-09-05 Thread princepawn
I am developing a script for use at very remote locations. Thus, to debug it, I need to have trace logs sent to me. Ideally, the script would run, dump its trace to a file and just before termination ftp the trace log to my machine. However, it appears that trace output only goes to STDOUT, w

[REBOL] Please help with failed FTP read command

2000-09-05 Thread princepawn
I seem to able to access the machine I want to, but, a *write* attempt is leading to failure, even though I am only trying to read a directory list from an ftp server. >> read ftp://199.105.186.51 connecting to: 199.105.186.51 ** User Error: Server error: tcp 530 Anonymous FTP access denied.. **

[REBOL] Please help with FTP read command

2000-09-05 Thread princepawn
For some reason, a machine I can manually ftp to does not work through rebol. My proxy settings seem to be ok, because when I try to access the site anonymously, I get back a denied msg. However, I am confused as to why a REBOL read operation would be denied because of attemting to *write* on

[REBOL] Why cant mutually exclusive refinements have the same argument name

2000-09-05 Thread princepawn
I have a function that will either get or put a filename... of course I want to use the same name for the file regardless, and this will not pose a problem because the arguments are mutually exclusive. However, REBOL is complaining about me using the same name for 2 mutually exclusive argumen

[REBOL] Enumerated type creation

2000-09-05 Thread princepawn
rl = rebol) 'hates href perl ] myth-gamer: http://www.bungie.net/bin/stats.pl?player=princepawn ; angles makes this a href instead of code! use ur imagination! href: func [U T] [ rejoin [ "a href=" U ">" T "/a" ] ] perl: href http://www.perl.com "Per

[REBOL] switch or case statement?

2000-09-05 Thread princepawn
] myth-gamer:http://www.bungie.net/bin/stats.pl?player=princepawn ; angles makes this a href instead of code! use ur imagination! href: func [U T] [ rejoin [ "a href=" U ">" T "/a" ] ] perl: href http://www.perl.com "Perl" Get your FREE Email and Voicemail at Lycos Communications at http://comm.lycos.com

[REBOL] varargs in rebol?

2000-08-31 Thread princepawn
Is it possible to design a rebol function that takes a variable number of arguments, ie: va-func 1 2 va-func 1 2 3 va-func 1 2 3 4 What immediately comes to mind is to use a block for the varargs part of the call, ie va-func 1 [2] va-func 1 [2 3] va-func 1 [2 3 4] But I thought I would just

[REBOL] /deep versus /only

2000-08-30 Thread princepawn
Thought you would like to hear what "the boys" have to say about /deep versus /only - Forwarded Message - DATE: Mon, 28 Aug 2000 17:21:39 From: [EMAIL PROTECTED] To: [EMAIL PROTECTED] princepawn, The /only refinement is used for a block nested within another

[REBOL] PGP encryption from REBOL

2000-08-30 Thread princepawn
calls. --- ; run this in your ; http://www.rebol.com>REBOL Interpreter! terrence-brannon: [ [EMAIL PROTECTED] perl-refugee myth-gamer ] perl-refugee: [ 'loved href perl discovery: (metaperl = rebol) 'hates href perl ] myth-gamer:http://www.bungie.net/bin/stats.pl?player=princepawn ;

[REBOL] Is REBOL interpreted or byte-compiled?

2000-08-29 Thread princepawn
rrence-brannon: [ [EMAIL PROTECTED] perl-refugee myth-gamer ] perl-refugee: [ 'loved href perl discovery: (metaperl = rebol) 'hates href perl ] myth-gamer:http://www.bungie.net/bin/stats.pl?player=princepawn ; angles makes this a href instead of code! use ur imagination! href: func [

[REBOL] forall should have a refinement /then-reset Re:(2)

2000-08-29 Thread princepawn
rl-refugee myth-gamer ] perl-refugee: [ 'loved href perl discovery: (metaperl = rebol) 'hates href perl ] myth-gamer:http://www.bungie.net/bin/stats.pl?player=princepawn ; angles makes this a href instead of code! use ur imagination! href: func [U T] [ rejoin [ "a href=&quo

[REBOL] using find/only to match blocks

2000-08-29 Thread princepawn
; or this ... whatever works --- ; run this in your ; http://www.rebol.com>REBOL Interpreter! terrence-brannon: [ [EMAIL PROTECTED] perl-refugee myth-gamer ] perl-refugee: [ 'loved href perl discovery: (metaperl = rebol) 'hates href perl ] myth-gamer:http://www.bungie.net/bin/stats.pl?play

[REBOL] forall should have a refinement /then-reset

2000-08-29 Thread princepawn
I'm sure you've seen the REBOL idiom: forall line [ ... ] line: head line I would appreciate it if I could type: forall/then-reset line [ ... ] Get your FREE Email and Voicemail at Lycos Communications at http://comm.lycos.com

[REBOL] Philosophical/Linguistic Observation: REBOL has very little punctuation

2000-08-28 Thread princepawn
I was just trying to amuse myself by looking at a user-contributed REBOL site and I realized something. As I tried to simply scan the text without looking in any detail, I was gaining absolutely no information about the script. This is because, unlike Perl and perhaps English, REBOL has very li

[REBOL] append/only and copy/deep

2000-08-28 Thread princepawn
It would be more uniform for these refinements to have the same name as they do the same thing: ie, append/only should be named append/deep or copy/deep should be named copy/only for consistency Get your FREE Email and Voicemail at Lycos Communications at http://comm.lycos.com

[REBOL] forming a string from a block but inserting a separation character

2000-08-28 Thread princepawn
s: [ 9 8 7 6 5 4 3 2 1 ] How do I create the string "9.8.7.6.5.4.3.2.1" from it? I thought that reform would have a /sepchar refinement, but it didnt. Get your FREE Email and Voicemail at Lycos Communications at http://comm.lycos.com

[REBOL] what if a function requires multiple argument-based refinements?

2000-08-28 Thread princepawn
This is a bit of an abstract question by a person who is 1/3rd of the way through the McGraw text, but I just keep popping with questions. What if I had the following: >> f: func [ a /ref1 arg1 /ref2 arg2] [ either ref2 [ print "ref2" ] [ print "no ref2" >] ] >> f/ref1 3 /ref2 4 1 no ref2 == 1

[REBOL] copy versus copy/deep

2000-08-28 Thread princepawn
As my example below shows, there does not appear to a difference in handling nested blocks between copy and copy/deep >> a: [ 1 2 [ 3 [ 4 5 ] 6 ] 7 8 ] == [1 2 [3 [4 5] 6] 7 8] >> b: copy a == [1 2 [3 [4 5] 6] 7 8] >> b == [1 2 [3 [4 5] 6] 7 8] >> c: copy/deep a == [1 2 [3 [4 5] 6] 7 8] >> c ==

[REBOL] Creating an absolute path filename via join on directory and filename

2000-08-28 Thread princepawn
I want to create a configuration file which loads in some functions I wrote. I wrote a verbose description of the program below, but then figured: "Gee, REBOL is actually more concise and easy to understand than my English!" REBOL [] rebol-dir: "/cygwin/home/administrator/rebol" j: join rebol

[REBOL] make list 0 versus make list []

2000-08-27 Thread princepawn
I read something in the REBOL McGraw-Hill book, but would like to verify it. Is there a difference on subsequent invocations of a function if I bind a (local?) value using make list! 0 versus make list! [] So, now I have created 4 cases: make list!.0 or [] the

[REBOL] Interfaces to C code & "Is there a mailing list archive?"

2000-08-25 Thread princepawn
1- Given that REBOL is distributed as a binary, I was wondering how one might compile in support for external FORTRAN or C or C++ libraries... 2- I looked around for a mailing list archive before asking this question, but did not see one. Get your FREE Email and Voicemail at Lycos Communica

[REBOL] Does REBOL only use proxying for HTTP and FTP.. or also for POP3

2000-08-25 Thread princepawn
If my pop3 client I want to use to send mail is outside of our firewall on the internet, then I must access its POP3 port via our proxy. I am able to use our CERN(generic) proxy just fine to make HTTP connections, but was wondering if REBOL was not doing so for POP3 I am using http://www.net

[REBOL] Please help with proxy setup

2000-08-25 Thread princepawn
Hi, we dont have a pop server here at work, they have some beast call MAPI (not IMAP) that is used, for example, if you want to setup Microsoft Outlook or something. I have an outside ISP (Earthlink) and I know that it gets my email from pop.earthlink.net. Our proxy is esnproxy the port by wh

[REBOL] mailing list since 1998 & full names in sender Re:

2000-08-24 Thread princepawn
I dont mean to embarrass anyone, but, I went to abooks.com to buy the REBOL guide and REBOL for dummies and typed rebol, then Rebol, then REBOL into their search engine, and guess what the reply was? "Nothing found" --- Powered by REBOL Really, this should be fixed. Send your favorite photo