Erlang по-русски. Форум: Последние 35 сообщений

dym "Как получить из строки tuple"

dym — Fri, 06 Nov 2009 12:28:30 +0000

erl_scan как раз то, что надо. Спасибо огромное.

dmitriid "Как получить из строки tuple"

dmitriid — Fri, 06 Nov 2009 10:21:21 +0000

есть, например, file:consult/1, это для файлов

но самое главное, см. How do I... convert a text string representation of a term to a term? (пункт 5.4)

dym "Как получить из строки tuple"

dym — Thu, 05 Nov 2009 15:06:33 +0000

От open_port, который открыл tail -f на некий файл, я получаю данные в виде:
"{test, aaaa}". Я хочу получить в конечном результате {test, aaaa}.
В лоб задачу решить не получается, так как:
1> list_to_atom("{test, aaaa}").
'{test, aaaa}'
2> list_to_atom("test").
test

Какие могут быть ещё варианты? Использовать регулярные выражения очень не хочется
open_port открываю так:
open_port({spawn, Cmd}, [ {cd, Dir}, stderr_to_stdout, {line, 256}, exit_status])

dmitriid "Помогите новичку"

dmitriid — Wed, 04 Nov 2009 10:33:01 +0000

> просто я кроме этова сайта нигде не нашел форум по ерлангу.

Есть еще гуглогруппа (в ссылках слева)

> exception error: undefined funktion lab1:position/2

если данные вводятся из консоли, то:
- оба файла (lab1 и shunt) должны быть скомпилированы
- lab1.beam и shunt.beam должны быть видны Эрлангу (например, консоль должна быть запущена в директории, где лежат эти два файла)

Agapon "Помогите новичку"

Agapon — Sat, 31 Oct 2009 02:29:00 +0000

Я хочу извеница за такова образа оборшение но просто я кроме этова сайта нигде не нашел форум по ерлангу.
Вобшем я делаю одно зодание на ерланге.
задача заключается в етом:
у меня есть поезд (лист) розмер не изветный, и мне нужно передвигать вогоны следуюшим образом:
все вогоны перед определеным вагоном Х в одну ячейку и все после вагона Х в другую например :
сплит([а,б,в],а) должен дать результат ([],[б,в])
вот мой код :
split(Xs,Y)->split(lab1: drop(hd(lab1:position(Xs,Y),Y),tl(lab1: position (Xs,Y))).

в :лаб1 находяца некоторые методы которые я исползиваю у всех експорт([метод/2]).
Metod drop:
drop (Xs,N) when N>=1 -> drop(tl(Xs),N-1);
drop (Xs,N) -> [hd(Xs)].
Metod position:
position (Xs,Y,P) when Y==hd(Xs)->P;
position (Xs,Y,P) when Y/=hd(Xs) ->position (tl(Xs),Y,P+1).

Moй:
shunt:split([a,b,c],a).
код вызываеца но когда я ввожу данные выдается вот эта ошибка:
** exception error: undefined funktion lab1:position/2
in function shunt:split/2

NixU "Вакансия для Erlang разработчика от Yandex"

NixU — Wed, 28 Oct 2009 23:17:41 +0000

Очень ищу программиста на erlang. Да, работать над jabber server, офис, Яндекс, Москва. Плачу нормально, еда вкусная :)
(с) bobuk
http://twitter.com/bobuk/status/5240149402

dym "Модуль Expect"

dym — Mon, 14 Sep 2009 11:21:27 +0000

Добрый день.
Возникло огромное желание работать с терминалами, телнетнуться на какой-то хост или зайти по ssh. Знаю что подобные модули есть для других языков, хотелось бы найти нечто подобное и для erlang'а.

ufm "DETS & BLOB"

ufm — Tue, 01 Sep 2009 09:06:15 +0000

Я всё никак не успокоюсь.
Собственно, на текущий момент я хочу просто предупредить тех, кто
пользуется DETS и/или Mnesia на 32-х битных системах и у кого размеры
DAT приближаются к 2Г - оно умеет портить DAT файлы. Вот пример, там
всё видно.:

ufm@imac:~/src$ erl
Erlang R13B01 (erts-5.7.2) [source] [smp:2:2] [rq:2] [async-threads:0]
[kernel-poll:false]

Eshell V5.7.2 (abort with ^G)
1> BigL = lists:seq(1,2000000).
[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,
23,24,25,26,27,28,29|...]
2> dets:open_file(tab,[{type,set}]).
{ok,tab}
3> dets:info(tab).
[{type,set},
{keypos,1},
{size,0},
{file_size,5432},
{filename,"tab"}]
4> lists:foreach(fun(X) -> dets:insert(tab,{X,BigL}) end, lists:seq
(1,50)).
ok
5> dets:info
(tab).
[{type,set},
{keypos,1},
{size,50},
{file_size,848861394},
{filename,"tab"}]
6> dets:close(tab).
ok
7> dets:open_file(tab,
[{type,set}]).
{ok,tab}
8> dets:info
(tab).
[{type,set},
{keypos,1},
{size,50},
{file_size,848861666},
{filename,"tab"}]
9> lists:foreach(fun(X) -> dets:insert(tab,{X,BigL}) end, lists:seq
(50,200)).
ok
10> dets:info
(tab).
[{type,set},
{keypos,1},
{size,126},
{file_size,2066820196},
{filename,"tab"}]
11> dets:close
(tab).
{error,{{bad_object,read_buckets},"tab"}}
12> dets:close
(tab).
{error,not_owner}
13> dets:info
(tab).
undefined
14> dets:open_file(tab,
[{type,set}]).
dets: file "tab" not properly closed, repairing ...
{error,{no_more_space_on_file,"tab.TMP"}}
15>

ufm "BLOB"

ufm — Thu, 27 Aug 2009 16:00:30 +0000

Что-то попробовал я поиграться с большими наборами данных, и взгрустнулось мне.
L = lists:seq(1,20000000) выполнялось достаточно долго и выжрало кучу памяти.
list_to_binary/1 больше 255 элементов в одном списке не берет

Или я хочу странного? Мне , собственно, надо с большими кусками данных работать. Причем изменять их, между процессами гонять, иногда и между нодами. Или при таких объёмах лучше об этом забыть?

walrus "Возникает ошибка при запуске erl.exe с ключем -sname."

walrus — Thu, 27 Aug 2009 14:23:47 +0000

я бы тут выделил ewouldblock и get_tcp_address . У вас там с сеткой все ладно?

dmitriid "Возникает ошибка при запуске erl.exe с ключем -sname."

dmitriid — Wed, 26 Aug 2009 16:25:23 +0000

Честно гооря, я уже не помню, как поборол эту ошибку, если вообще поборол. Скоре всего не поборол, а сделл так:

В %WINDOWS%\system32\drivers\etc\hosts

прописал

127.0.0.1 myhost

и запускад erl с -name server@myhost

klinkin "Возникает ошибка при запуске erl.exe с ключем -sname."

klinkin — Wed, 26 Aug 2009 15:57:04 +0000

Запускаю под WinXP

klinkin "Возникает ошибка при запуске erl.exe с ключем -sname."

klinkin — Wed, 26 Aug 2009 15:54:11 +0000

Подскажите в следствие чего может возникать ошибка
при запуске erl.exe -sname SERVER.

Текст ошибки:
{error_logger,{{2009,8,26},{17,55,32}},"Protocol: ~p: register error: ~p~n",["inet_tcp",{{badmatch,{error,ewouldblock}},[{inet_tcp_dist,get_tcp_address,1},{inet_tcp_dist,listen,1},{net_kernel,start_protos,4},{net_kernel,start_protos,3},{net_kernel,init_node,2},{net_kernel,init,1},{gen_server,init_it,6},{proc_lib,init_p_do_apply,3}]}]}
{error_logger,{{2009,8,26},{17,55,32}},crash_report,[[{initial_call,{net_kernel,init,['Argument__1']}},{pid,<0.20.0>},{registered_name,[]},{error_info,{exit,{error,badarg},[{gen_server,init_it,6},{proc_lib,init_p_do_apply,3}]}},{ancestors,[net_sup,kernel_sup,<0.8.0>]},{messages,[]},{links,[<0.17.0>,#Port<0.50>]},{dictionary,[{longnames,false}]},{trap_exit,true},{status,running},{heap_size,377},{stack_size,24},{reductions,341}],[]]}
{error_logger,{{2009,8,26},{17,55,32}},supervisor_report,[{supervisor,{local,net_sup}},{errorContext,start_error},{reason,{'EXIT',nodistribution}},{offender,[{pid,undefined},{name,net_kernel},{mfa,{net_kernel,start_link,[['SERVER',shortnames]]}},{restart_type,permanent},{shutdown,2000},{child_type,worker}]}]}
{error_logger,{{2009,8,26},{17,55,32}},supervisor_report,[{supervisor,{local,kernel_sup}},{errorContext,start_error},{reason,shutdown},{offender,[{pid,undefined},{name,net_sup},{mfa,{erl_distribution,start_link,[]}},{restart_type,permanent},{shutdown,infinity},{child_type,supervisor}]}]}
{error_logger,{{2009,8,26},{17,55,32}},std_info,[{application,kernel},{exited,{shutdown,{kernel,start,[normal,[]]}}},{type,permanent}]}
{"Kernel pid terminated",application_controller,"{application_start_failure,kernel,{shutdown,{kernel,start,[normal,[]]}}}"}

dyp2000 "Юникод из приложений"

dyp2000 — Thu, 06 Aug 2009 07:47:46 +0000

Вот так надо:
-------------------------
-module(test_utf8).
-export([test/0]).

test() ->
io:format("1. ~ts~n", [<<"Русские буквы">>]),
Str = "Русские буквы",
BitStr = list_to_bitstring(Str),
io:format("2. ~ts~n", [BitStr]).
--------------------------

Vash "Юникод из приложений"

Vash — Fri, 10 Jul 2009 12:29:10 +0000

Добрый день!

Есть проблема с юникодом при работе из приложений. OTP13B0, юникод не
обрабатывается ни io, ни io_lib, все строки представляются из чисел до
255. Не работает ~ts, <<"Русский"/utf8>>. При этом при работе в
консоле все идет на ура. Куда, как говорится, копать?

dmitriid "Ввод и вывод"

dmitriid — Mon, 06 Jul 2009 08:23:08 +0000

Каюсь и посыпаю голову пеплом :)

walrus "Ввод и вывод"

walrus — Sun, 05 Jul 2009 23:03:48 +0000

dmitriid, get_line вполне понимает атомы.

Eshell V5.6.5 (abort with ^G)
1> io:get_line(asd).
asdasdasd
"asdasd\n"
2> io:get_line('asd simsim ').
asd simsim input here
"input here\n"
3>

Victor "Ввод и вывод"

Victor — Sun, 05 Jul 2009 13:10:13 +0000

Как оказалось, проблема была с вызовом функции. Я избалован языками где функции без аргументов можно вызывать без скобок. Эрланг таких шуток не понимает, к сожалению.

dmitriid "Ввод и вывод"

dmitriid — Sun, 05 Jul 2009 11:03:46 +0000

io:get_line('Enter phrase:')

здесь нужны двойные кавычки, а не одинарные. Одинарные — это атомы, двойные — строки

Victor "Ввод и вывод"

Victor — Sat, 04 Jul 2009 19:20:00 +0000

Пытаюсь сделать простейший ввод информации пользователем и вывод ее обратно:

-module(echo). -export([autoresponder/0]).


autoresponder() ->

	Phrase = clean(io:get_line('Enter phrase:')),

	io:format(\"You told me: ~w\", [Phrase]).

clean(Data) -> string:strip(Data, both, $\n).

Компилируется нормально, но при выводе вместо приглашения что-нибудь ввести вываливается ошибка '* 1: illegal expression'

Как это можно поправить?

dmitriid "Шифрование данных в Erlang"

dmitriid — Wed, 01 Jul 2009 10:21:21 +0000

http://erlang.org/doc/apps/crypto/index.html — для RSA
http://github.com/skarab/erlang-bcrypt/tree/master — для BlowFish

coffius "Шифрование данных в Erlang"

coffius — Wed, 01 Jul 2009 09:52:19 +0000

Существуют ли библиотеки, реализующие алгоритмы шифрования данных? Особенно интересуют RSA, BlowFish.

dmitriid "как обрезать Nitrogen?"

dmitriid — Mon, 22 Jun 2009 09:51:27 +0000

Вообще-то Nitrogen — это веб-вреймворк поверх mochiweb. В зависимости от того, какая функциональность нужна, возможно имеет смысл взять чисто mochiweb или webmachine (тоже поверх mochiweb)

JLarky "как обрезать Nitrogen?"

JLarky — Sun, 21 Jun 2009 02:47:19 +0000

Есть желание всунуть в свою прогу http-сервак, мне приглянулся Nitrogen, но какой-то он на вид довольно тяжёлый. Есть ли у кого опыт его обрезания? А то я пока не пойму что тут можно выкидывать, а что нет.
Ну или может есть какие-то другие более легкие решения? Но с другой стороны терять в функциональности не хочется (

dmitriid "POP3 SMTP client"

dmitriid — Mon, 15 Jun 2009 10:37:28 +0000

Честное слово не знаю :) Это можно попрашивать еще в русской рассылке по эрлангу, может кто сталкивался

camui "POP3 SMTP client"

camui — Mon, 15 Jun 2009 06:30:12 +0000

Необходимо еще работать с POP3.

И я не знаком с sendmail хорошо, что на счет вложений?

dmitriid "POP3 SMTP client"

dmitriid — Thu, 11 Jun 2009 13:41:39 +0000

Возможно, вызывать sendmail через os:cmd?

camui "POP3 SMTP client"

camui — Thu, 11 Jun 2009 12:59:43 +0000

Возникла необходимость работы с почтой в эрланге. Нашел в сети epop, но здесь все реализовано на начальном уровне, нет поддержки аттачей, на сколько я понял.
Еще указывают на модуль mail, который входит в состав веб-сервера yaws, но он вроде как использует yaws_api. Хотелось бы реализовать работу с почтой без запуска yaws'а.

Можно написать самому конечно, но нет времени на это. Может быть кто-то уже писал или использовал чужие модули для работы с почтой?

Koshak "Есть рабочий пример Выкачивания Сайта на ерланге"

Koshak — Sat, 16 May 2009 10:53:16 +0000

http://www.erlang.org/examples/small_examples/urlget.erl

Koshak "Связка Erlang с прочими"

Koshak — Sat, 16 May 2009 09:16:59 +0000

Посмотрел . нет ли примера с питоном ?

Koshak "Есть рабочий пример Выкачивания Сайта на ерланге"

Koshak — Sat, 16 May 2009 09:16:26 +0000

Себж.

dmitriid "Связка Erlang с прочими"

dmitriid — Fri, 15 May 2009 08:56:10 +0000

Например, 37signals переписали свой чат с С на Erlang и довольны, как слоны :) Причин может быть много :)

alekciy "Связка Erlang с прочими"

alekciy — Fri, 15 May 2009 03:15:27 +0000

Интересно, что может заставить человека что-то реализовывать на Erlang когда у него значительная часть написана на С++? Что мешает и дальше его использовать?

architect "ErlIDE не хочет работать"

architect — Thu, 30 Apr 2009 20:52:16 +0000

Может написать разработчику об этой проблемме? Я бы сам написал, но с английским не дружу. Сейчас получается глупая ситуация: выходят регулярно новые версии с новыми фичами, но ни одна из них не работает вообще. Хотя б оду работающую сделали.

ice "echo-server простой тест."

ice — Thu, 30 Apr 2009 06:34:24 +0000

тебе отписали на мыло ;) лови. Там у человека идея есть. Если интересно - обсудите :).