$line= substr($_,10,length($_));
           @array = split(/ /, $line);
           $line='';
                 

           foreach my $idx (0 .. 5) {
            $array[$idx].="|"
           }
           print "$counter|",@array,"\n";