use autodie::hints qw/ DEFAULT_SCALAR DEFAULT_LIST /;
autodie::hints->set_hints_for(
  \&foo,
  scalar => DEFAULT_SCALAR,
  list   => DEFAULT_LIST,
);

use autodie::hints qw/ COND1 COND2 COND3 /;
autodie::hints->set_hints_for(
  \&foo,
  any => sub { &COND1 and &COND2 or &COND3 },
);