push @s, &share( { $cmd => time } }; ## The & before share() is important here; and one of the few times you should ever use it.

## or

push @s, &share_clone( { $cmd => time } }; 

## or 

my %hash : shared = ( $cmd => time() );
push @s, \%hash;

##</code><code>##

my @array : shared;
$array[ 0 ] = 'fred'; ## ok
$array[ 1 ] = 12345; ## ok
$array[ 2 ] = [ 1,2,3 ] ## NOT OK
$array[ 2 ] = &share( [ 1,2,3 ] ); ## OK
$array[ 3 ] = { 'a'..'z' }; ## NOT OK
my %hash : shared = ( 'a' .. 'z' );
$array[ 3 ] = \%hash; ## OK
...

##</code><code>##

lock @s;
push @s, &share( { $cmd => time() } ); 

...
lock %{ $s[ 9 ] };
$s[ 9 ]{ $cmd } = $newtime;