#!/usr/bin/env escript
% -*- mode: erlang -*-
main(
) ->
{ok,{_,[{abstract_code,{_,AC}}]}} = beam_lib:chunks(BeamFile,[abstract_code]),
io:fwrite("~s~n", [erl_prettypr:format(erl_syntax:form_list(AC))]).

这个更方便些，^_^
f(),{ok, {_, [{abstract_code, {_,Abs}}]}} = beam_lib:chunks("mon_surekam_x7605.beam", [abstract_code]),io:fwrite("~s~n", [erl_prettypr:format(erl_syntax:form_list(Abs))]).

这个意思是说，erlang写的代码只能开源吗？

编译成.beam的时候要编译成abstract_code才能恢复成.erl。