Select Code to Download

versatility( %hash1, %hash2 );

sub versatility {
    my( $genome1, $genome2 ) = @_;
...
        } 
    }
}

versatility( \%hash1, \%hash2 );