初试Robol语言

看到周金银的博客 参加了两天QCon会议,你有什么感觉?,除了那个“动态鱼眼”非常搞笑外,顺藤摸瓜,看了一下提到的 Rebol 语言,看了看介绍,试了一下,感觉很棒。很多常见的功能只用一句就可以搞定,可以省很多力气。

步骤:

1、下载 REBOL/View , 由多种平台的版本 

2、安装后界面

image

3、点击 Console ,可以在命令行下执行脚本

例如:一句脚本就可以实现的功能

打印网页  print read http://www.rebol.com
GUI界面下,读取网页并Email给别人 view layout [u: field "user@rebol.com" h: field "http://" btn "Send" [send to-email u/text read to-url h/text alert "Sent"]]
FTP上传文件 foreach file load %./ [if not dir? file [write/binary join ftp://user:pass@example.com/ file read/binary file]]
TCP 端口扫描 repeat n 100 [if not error? try [close open probe join tcp://localhost: n] [print [n "is open"]]]
自由绘图 
view layout[s: box black 400x400 feel[engage: func[f a e][if find[down over]a[append s/effect/draw e/offset show s]if a = 'up[append s/effect/draw 'line]]]effect[draw[line]]]
网站编辑器 view layout[f: field btn"Edit"[editor to-url f/text]]
(53 bytes大的程序,可以打开、编辑、保存网站文件,文件引用格式为 ftp://usepass@yourwebsite.com/yourpath/public_html/file.ext
更多的一句话脚本:http://www.rebol.com/oneliners.html
 
4、脚本文件
使用记事本,编辑脚本文件,保存为 .r 文件,选择它,击开快捷菜单,选择 view 即可执行
例如:更多的实例见 http://www.rebol.com/pre-view.html
注意Rebol当中目录的表示方式:
do %demo.r
print read %readme.txt
data: load %business/contacts.r
dir: %"/c/documents and settings/Carl/"     (如果有空格,使用引号扩起来,表示 c:\documents and settings\Carl\)
dir: %/c/documents%20and%20settings/Carl/   (可以使用URL编码方式)
 
其他有趣的功能:
网站监测器,在网站无法访问时发送Email提示
为自己的照片文件夹创建Thumbnail和Html索引
原文地址:https://www.cnblogs.com/chinaontology/p/Rebol.html