my $i = 0; # or whatever
$record[$i++]->{bytes} = $_ for get_bytes($num);