Select Code to Download

$contacts{$contact} = &share( {} ); 
share( $contacts{$contact}{'a'} ); 
...

In a thread, I try to execute
lock( $contacts{$user_id} );

share( $contacts{$contact}{'user_id'} );

is_shared ( $contacts{$user_id} )