Select Code to Download

my $callbackFunc = \&Helper::func;
my $obj = new BigOne ( vals => $callbackFunc);

my $vals = shift;
.... 
...
   ..............
};
....

my $callbackFunc = \&Helper::func( additional_parameter => 'xxx'  );

my $kv = &$vals( id => $selected, dbh => $$self{dbh}, additional_param
+eter => 'xxx'  );

my $kv = &$vals( id => $selected, dbh => $$self{dbh});