sub get_statistics { ... my $fastaFile = $current_file; ...