$record[$_]->{bytes} = [get_bytes($num)]->[$_] for 0..$num;