|
PureBytes Links
Trading Reference Links
|
On Tue, 3 Nov 1998, Doug Deming wrote:
> Deming: The only method I know to get the quote marks in your ASCII file is
> via a special DLL which will return the quote mark wherever you need them.
> It's an easy DLL to write, let me know if you're interested.
How about post-processing:
addquotes:
#!/usr/bin/perl -w
#usage: addquotes inputfile outputfile
$inputfile = shift;
$outputfile = shift;
open(IN,"$inputfile") || die("Error opening $inputfile - $!");
open(OUT,">$outputfile") || die("Error opening $outputfile - $!");
while (<IN>) {
($date,$close) = split /,/;
print OUT "\"$date\",\"$close\"";
}
close IN;
close OUT;
Cheers,
Jim
|