%cromozom = ('GENA_A' => 'ttgtagtagtt', 'GENA_B' => 'ggtgtgatag', 'GENA_C' => 'gagtagcaa');
$hashreferinta = \%cromozom;

print "Referinta este: $hashreferinta \n";
#Modalități de a dereferi conținutul unui hash
print "Referinta pointeaza la valoarea:", %{$hashreferinta}, "\n";
print "Referinta pointeaza la valoarea:", %$hashreferinta, "\n";
print "Referinta pointeaza la valoarea: $$hashreferinta{GENA_A} \n";
print "Referinta pointeaza la valoarea: $hashreferinta->{GENA_A} \n";