escript Erlang scripting support, 可以讓erl模組轉身變成unix script來使用，大大方便使用者，具體的使用參看otp文件。我這裡要演示的是些比較被忽視的高階特性:

首先crack erts/etc/common/escript.c:33 static int debug = 1; 讓之顯示呼叫引數。

[email protected]:~# cat >factorial

[color=red]#!/usr/bin/env escript
%% -*- erlang -*-
%%! -smp enable -sname factorial -mnesia debug verbose[/color]
main([String]) ->
try
N = list_to_integer(String),
F = fac(N),
io:format("factorial ~w = ~w\n", [N,F])
catch
_:_ ->
usage()
end;
main(_) ->
usage().

usage() ->
io:format("usage: factorial integer\n"),
halt(1).

fac(0) -> 1;
fac(N) -> N * fac(N-1).

CTRL+D

[email protected]:~# chmod +x factorial
[email protected]:~#　./factorial  10

[color=red]erl +B -boot start_clean -noshell -smp enable -sname factorial -mnesia debug verbose -run escript start -extra ./factorial 10[/color]
factorial 10 = 3628800

特性1：

摘抄文件。。。
On the third line (or second line depending on the presence of the Emacs directive), it is possible to give arguments to the emulator, such as

%%! -smp enable -sname factorial -mnesia debug verbose

Such an argument line must start with %%! and the rest of the line will interpreted as arguments to the emulator.

我們可以看到　這些選項被傳遞給了 erl

特性2：
-mode(compile).

這個選項是在escript.erl這個模組處理的。預設情況下 escript是被解釋執行的，如果你的指令碼很複雜，那麼效率估計會是瓶頸。這種情況下， 你可以通過這個選項來讓escript來先編譯你的模組成opcode, 在vm裡面執行。

特性3：
-d 選項 用來除錯script的
-c 編譯執行
-i 解釋執行
-s 只檢查不執行
[email protected]:~#　escript -d ./factorial 10
我們就可以看到 除錯介面如下圖

特性4：
可以把一個beam檔案作為script

[email protected]:/usr/src# cat hello.erl

-module(hello).
-export([start/0,main/1]).

main(_)->
start().

start()->
io:format("hello world~n",[]).

[email protected]:/usr/src# erlc hello.erl
[email protected]:/usr/src# cat >hello

#!/usr/bin/env escript
%% -*- erlang -*-
%%! -smp enable -sname factorial -mnesia debug verbose

CTRL+D

[email protected]:/usr/src# cat hello.beam >>hello
[email protected]:/usr/src# chmod +x hello
[email protected]:/usr/src# ./hello
hello world

特性5:
可以把一個zip檔案作為script

[email protected]:/usr/src# cat hello.erl

-module(hello).
-export([start/0,main/1]).

main(_)->
start().

start()->
io:format("hello world, fac(10)=~w ~n",[fac:fac(10)]).

[email protected]:/usr/src# cat fac.erl

-module(fac).
-export([fac/1]).

fac(0) ->
1;
fac(N) -> N * fac(N-1).

[email protected]:/usr/src# erlc *.erl
[email protected]:/usr/src# erl
Erlang R13B03 (erts-5.7.4)
[smp:2:2] [rq:2] [async-threads:0] [hipe] [kernel-poll:false]

Eshell V5.7.4  (abort with ^G)
1> zip:zip("hello.zip", ["hello.beam", "fac.beam"]).
{ok,"hello.zip"}
2>

[email protected]:/usr/src# cat >hello

#!/usr/bin/env escript
%% -*- erlang -*-
%%! -smp enable -sname factorial -mnesia debug verbose -escript main hello

CTRL+D

[email protected]:/usr/src# cat hello.zip >>hello
[email protected]:/usr/src# chmod +x hello
[email protected]:/usr/src# ./hello
hello world, fac(10)=3628800

特性6：
在獨立的包裡面 把escript偽裝成我們的應用程式

[email protected]:/usr/src# cat >hello.escript

-module(hello).
-export([start/0,main/1]).

main(_)->
start().

start()->
io:format("hello world~n",[]).

CTRL+D

[email protected]:/usr/src#  cp `which escript` hello
[email protected]:/usr/src# ./hello
hello world

規則是 escript 改名成xxxx 執行xxxx的時候 實際上要讀取的指令碼是 xxxx.escript

綜述： escript是很強大的 未來的erlang standalone全靠它。

Post Footer automatically generated by wp-posturl plugin for wordpress.