- or download this
$final_fragments{$final_fragment1} = $third_fragments[0];
- or download this
$final_fragments{scalar @final_fragment1} = $third_fragments[0];
$final_fragments{scalar @final_fragment2} = $third_fragments[scalar @t
+hird_fragments - 1];
- or download this
my $final_fragment1 = $seqname."_".$i."_1";
my $final_fragment2 = $seqname."_".$i."_2";
$final_fragments{$final_fragment1} = $third_fragments[0];
$final_fragments{$final_fragment2} = $third_fragments[scalar @third_fr
+agments - 1];