# packing
$str=pack ("d*",@numbers);
# unpacking to a correct column
$val=(unpack("d*",$str))[$col];