Select Code to Download

use strict;
use warnings;
...
    $queue->enqueue( join ' ', @_ );
}

       $self{'lock'} = 'lock';
       share( $self{'lock'} );