Rakesh Sahgal wrote: > Hello > > I have downloaded the following script from xmlworks.com > <http://xmlworks.com>. The purpose of this scrip is to convert > Intraday data exported from AB(using AFL code provided by Graham ) > into a pseudo EOD format for use elsewhere(TA programs that do not > support IntraDay format). > > > //////////==========////////// > use strict; > my $infile = shift; > my $outfile = shift; > my $ticker = shift; > open (IN,$infile) || die "Open IN failed $!"; > open (OUT,">$outfile") || die "Open OUT failed $!";
<<inline: Perl.gif>>
