小编Luk*_*uke的帖子

我将在TortoiseGit上更改GitHub帐户，因为当前帐户没有推送权限。

错误：[远程：拒绝（GitHub帐户）对（存储库）的权限]

有什么方法可以更改TortoiseGit上的GitHub帐户吗？

我有一个带有一堆字符串作为元素的数组,我想把它放入哈希.所以我先将数组中的字符串溢出,然后将解析后的字符串放入一个新的数组调用parse_list中.

这是我的代码:

#!/usr/bin/perl
use strict;
use warnings;
use feature 'say';
use Data::Dumper qw(Dumper);
my %hash;

my $string_array = [
                "Europe West France Spain Germany",
                "Europe North Finland Iceland",
                "Asia East Japan Korea China",
                "America North Mexico USA Canada"
    ];

foreach my $country(@{$string_array}){ 
    my @parse_list = split(/\s+/, $country);
    (my $continent,my $region,) = @parse_list[0,1];
    #I just know how to get the continent and region, I don't know how to put       
    #the element from index [2..4] to an array 

}

我怎么设置

大陆作为主键, …

我在Perl中有以下结构:

#!/usr/bin/perl
use strict;
use warnings;

my %hash = (
    'firstitem' => {
        '1' => ["A","99"],
        '2' => ["B","88"],
        '3' => ["C","77"],
    },
    'seconditem' => {
        '3' => ["C","100"],
        '4' => ["D","200"],
        '5' => ["E","300"],
    },
);

我正在寻找一种方法来找到每个哈希数组中的最大数量和最小数量.所以输出将是

firstitem: max:99, min:77
seconditem: max:300, min:100

我的想法是先对二级密钥进行排序,然后在for循环中进行冒泡排序或其他排序.它看起来不是很优雅和聪明.

    foreach my $k1 (keys %hash) {
        my $second_hash_ref = $hash{$k1};                   
        my @sorted_k2 = sort { $a <=> $b } keys %{$second_hash_ref}; 
        foreach my $i (0..$#sorted_k3){ 
            #bubble sort or other sort
        }
    }