Help for this page
open my $annotation_read_handle, '<', $annotation_file; my %annotations_for; ... push @$annotations_for{$an_chrom}, $ad; } close $annotation_read_handle;
# look up the list of annotations relevant to the current chromoso +me my $annotations_ref = $annotations_for{$main_chrom}; # loop through just these annotations ILC: foreach my $ad (@$annotations_ref) { # ... }
www.com | www.net | www.org
No recent polls found