foreach (@probExpr) {
    print "$_\n";
    #%distri{$_}=();
    %distri{$_}=[];
}

##</code><code>##

&hashOfArraysRef(\$distri{$probExpr[0]});

##</code><code>##

  $disti{$probExpr[0]} = function_that_returns_anonymous_array();

##</code><code>##

  $disti{$probExpr[0]} = function_that_returns_anonymous_array($probExpr[0]);

##</code><code>##

   $disti{$_} = function_that_returns_anonymous_array($_) for @probExpr;