$stream = gsl_fopen("histogram", 'r'); my $h = gsl_histogram_alloc(100); ok_status(gsl_histogram_fread($stream, $h));