sub from_cache {
    my $ticker = shift;
    my $ref = $data_cache{$ticker};
    return [ map [unpack("A10FFFFL", $_)], @$ref ];
}