$Command = join(' ', 
		    'EXEC', 
		    $SPROC, 
		    join(', ', 
			 @CHOICE[1 .. $elements_in_array])) . '';  


##</code><code>##


my $sql = "EXEC $SPROC ".
          join ', ', ('?') x $procs{$SPROC};

my $sth = $dbh->prepare($sql);
$sth->execute(@CHOICE);



##</code><code>##

$sth->execute($Command);