you could try using basic perl read()/print() commands on the piddles
data.
e.g.
print FILEHANDLE ${$pdl->get_dataref}
But this is what FastRaw is supposed to do so something of a mystery.
Maybe a buffering issue?
Karl
On Jun 23, 2006, at 3:59 PM, amy sansone wrote:
Hello -
I have a perl script that writes a large amount of data to binary
files using the PDL::IO::FastRaw "writefraw" command and it is
really slow when writing out the data. Significantly slower (~4
times) than when I write the same amount of data using a C
program. I would prefer to use a perl script rather than C but
have not been able to speed up the write time.
This is a slice of my code
$outfile = "junk";
$outdata = $data_nwp->clump(2)->($xy_index_nwp ->clump(-1));
open OUTFILE, ">$outfile" or die "Can not open file $outfile for
write :$!\n";
binmode OUTFILE;
writefraw($outdata,*OUTFILE);
close OUTFILE;
$outdata is a PDL of dimensions 334695 169
Is there another module which would be better to use? Has anyone
else had this problem?
Thanks for your time!
Amy
_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl