多进程环境下 一个没搞明白的问题

CODE:

sub user_online {
        my $sock_data = shift;
        if($sock_data =~/(.*)\|(.*)/)
        {
                my ($user_key,$user_id) = ($1,$2);
                print $user_key ."--------". $user_id . "\n";
                print $user_id . "_key\n";
        }
}

CODE:

321<-------->2
_key