in reply to Predefining sub Parameters
Or you might pass your data as a hash, and check that the appropriate keys are there.sub functionname { $a = shift; $b = shift; $c = shift; warn unless (ref \$a =~ /SCALAR/); warn unless (ref $b =~ /ARRAY/); warn unless (ref \$c =~ /SCALAR/); }
|
---|