If you don't mind throwing away @results, you could do
$_->{id} = shift @results for @box; [download]
In reply to Re: Merging an array into an AoH by BrowserUk in thread Merging an array into an AoH by neniro