(my $key, my $value) = %sequences

##</code><code>##

(my $key, my $value) = each %sequences