$result = mySub(@inpdb, qw(val1 val2) ) ;


##</code><code>##

$r = &mySub(@inpbd, @val) ;
$dummy = "@val" ;
$r = &mySub(@inpbd, qw($dummy)) ;

##</code><code>##

@r = &mySub(@inpDB, "$val1","$val2","$val3");