{ 
    lock( $shared );
    my $local = <PIPE>;
    $shared = $local; 
}