finding duplicates in txt file

[Natalie Conte]

HI,

 I have to find triplicates ProbeName $arg[8]  in a txt file and
calculate a mean of their associated valueProbe $args[13]

At the end my txt file has to contain unique probeName and valueProbe .

This si my beginning of a script to pull out the probename and
valueProbe information , I must say after that I don't know where to
start to get duplicate and mean.

use strict;

use warnings;

my @files = glob('/file/*sed91.txt');

 

foreach my $file (@files) { 

    open (INFILE, "$file") or die "line15 $!";

    open (OUTPUT, ">$file"."_output.txt") or die "line16 $!";

    while (my $line= <INFILE>){ 

                my @args =split (/\t/, $line);

                print OUTPUT $args[8] . "\t" . $args[13] ."\n";

    }

    close OUTPUT;

    close INFILE;

}   

 

Thanks

Nat




-- 
 The Wellcome Trust Sanger Institute is operated by Genome Research 

 Limited, a charity registered in England with number 1021457 and a 
 compa
ny registered in England with number 2742969, whose registered 
 office is 2
15 Euston Road, London, NW1 2BE.