@tmp = get_bytes($num);
for ($i=0;$i<scalar(@tmp);$i++) {
 $record[$i]->{bytes} = $tmp[$i];
}