qq_handler_return_hash.txt

来自「perl qq」· 文本 代码 · 共 53 行

add_handler call back return hash:

#################################
usr_info
my %usr_info_reply=(
	name=>"usr_info",
	uid=>$field[0],
        usr_name=>"$field[1]",
        usr_age=>"$field[7]",
        usr_sex=>"$field[7]",
    );


recv_mesg
my %recv_mesg_reply=(
            name=>"recv_mesg",
            mesg=>"$mesg",
            srcid=>$srcid,
            send_time=>$send_time,
            type=>$send_type,
	    member_uid=>$send_uid,
    );
send_type: buddy group

online_friends
my %online_friends=(
            name=>"online_friends",
            result=>\@friends,
    );

group_search
my %group_search_reply=(
            name=>"group_search",
            int_group_id=>$int_group_id,
            group_name=>$group_name,
            group_desc=>$group_desc,
    );

my %group_info_reply=(
        name=>"group_info",
        int_group_id=>$int_group_id,
        group_name=>$group_name,
        group_notice=>$group_notice,
        group_desc=>$group_desc,
);

group_online_member
my %group_online_member=(
	name=>"group_online_member",
        result=>@group_online_uid,
        );