gistfile1.txt

{ok, Viewers} = eredis:q(State#state.redis_pool, ["HGET", "channel:clients", Key]),
         ViewersInt = list_to_integer(binary_to_list(Viewers)),
         case ViewersInt > 0 of
             true ->
                 eredis:q(State#state.redis_pool, ["HSET", "channel:clients", Key, 0]),
                 ?D([Key, ViewersInt]),
                 net_pinger:set_billing(binary_to_list(Key), ViewersInt);
             _ -> ok
         end