my $pairs = iterator_multi(\@ingredients, \@meals);
while (my ($i, $m) = $pairs->())
{
	printf("%s\t%s\t%d\n", $i, $m, !!$pairings{$i, $m});
}