Skip to content

Instantly share code, notes, and snippets.

Hello Good Day,
This is Patrick Kelly With regards to your Company i am sending this email
Regards to order some (Rebar)I will like to know the type and sizes you
have in stock and get me the sales price of one so that i will
tell you the quantity i will be ordering, and if you accept credit card as a
form of payment..
Hope to read from you soon about my order request......
With Kind Regards.
-module(riakringer).
-compile(export_all).
assign(Partition, ToNode) ->
F = fun(Ring, _) ->
{new_ring, riak_core_ring:transfer_node(Partition, ToNode, Ring)}
end,
{ok, _} = riak_core_ring_manager:ring_trans(F, undefined),
ok.
-module(dm).
-compile(export_all).
%%
%% Identify the initial call of a PID; look first in pdict for the
%% value set by OTP-compliant procs, or fallback to lower-level info
%% if that's not available.
%%
ic(Pid) when is_pid(Pid) ->
#!/bin/bash
BASEDIR=`pwd`
if [ ! -f "$BASEDIR/services/riak/$1.jmx" ]; then
echo "Can't find JMX file for $1"
exit 1
fi
(cd jmeter && bin/jmeter -n -t $BASEDIR/services/riak/$1.jmx \
riak@domU-12-31-39-07-36-02.compute-1.internal)1> rp(riak_ring_manager:get_my_ring()).
{ok,{chstate,'riak@domU-12-31-39-07-36-02.compute-1.internal',
[{'riak@domU-12-31-39-06-B4-71.compute-1.internal',{415,
63430439006}},
{'riak@domU-12-31-39-07-34-31.compute-1.internal',{614,
63430438996}},
{'riak@domU-12-31-39-06-B9-12.compute-1.internal',{2,
63430438990}},
{'riak@domU-12-31-39-07-36-02.compute-1.internal',{1,
63430438963}},
consult_str(eof, Acc) ->
lists:reverse(Acc);
consult_str(B, Acc) ->
case erl_scan:tokens([], B, 0) of
{done, Result, Remaining} ->
case Result of
{ok, Tokens, _} ->
{ok, Term} = erl_parse:parse_term(Tokens),
consult_str(Remaining, [Term | Acc]);
{eof, _} ->