my %procs = ( reception => 29 ); unless (exists $procs{$SPROC}) { die "Unknown stored proc: $SPROC\n"; } $Command = join(' ', 'EXEC', $SPROC, join(', ', @CHOICE[1 .. $elements_in_array])) . '';