my $gene_name = 'frobnitz'; 
$sequence=$fastas{$gene_name};