Select Code to Download

    $request->enqueue( [$dbname,$dataEntity{$dbname}] );

use threads::shared;
...
...
    my @args :shared = ( $dbname,$dataEntity{$dbname} );
    $request->enqueue( \@args );
};