sub sprinkled_in {
  my $sprinkle1 = shift;
  my $sprinkle2 = shift;
  my %unsprinkled = @_;
}