Leser: 20
1
2
3
4
5
6
7
8
9
10
11
my %sorted_reads=();
foreach my $hit_file (@hits){
open(HITS, "<".$hit_file);
my @hit = <HITS>;
foreach my $line (@hit){
chomp($line);
next unless($line);
my ($name,$start,$stop,$direction,$align_q,$align_s,$error) = split /\t/, $line;
%sorted_reads($name => $error);
}
}
Guest aikazebin total Perl-Newbie. Da bekomme ich diese Fehlermeldung geworfen, dass mein Hash %sorted_reads nicht erkannt wird.
Quote
$sorted_reads{ $name } = $error;
%sorted_reads($name => $error);
$sorted_reads{$name} = $error;