NAME	6/1/2011	9:30:00	16.76	469898	Q	0
NAME	6/1/2011	9:30:00	16.75	300	Q	0
NAME	6/1/2011	9:30:00	16.75	150	Q	0
NAME	6/1/2011	9:30:01	16.76	756	Q	0
NAME	6/1/2011	9:30:01	16.76	300	Q	0
NAME	6/1/2011	9:30:02	16.76	100	Q	0

##</code><code>##

 while (<FILE>) {
            $csv->parse($_);
            my @columns = $csv->fields();
            $start_time = str2time($columns[1].' '.$columns[2]);
            next unless ($curr_time != $start_time) {
                $exchange = $column[5];
                push (@arr1, $column[3]);
                push (@arr2, $column[4]);
                push (@arr3, $column[5]);
                $curr_time = str2time($columns[1].' '.$columns[2]);
            print "Avg= high= low= in one second=";