如何将两个数组中值 作为散列变量中，第一数组的值做key ，另外一个数组的值做value

emlin129

想了半天还没想处理，不是编程出身，工作需要需要写个提供工作效率的脚本，先谢了！

emlin129

高手不在，还是没看懂。
@gikey； @givalues从文件中获取满足条件的字符集和数值， 字符串和数值是一一对应的，现在想把它放到%gi变量中，用for 循环写了一下，发现就只写了一个key和value

for ($i=0,$i<$#gikey+1,$i++) {
        %gi = ($gikey[$i] => $givalues[$i]);       
}

sunzhiguolu

回复 2# emlin129

1. 
   
2. for ($i=0;$i<$#gikey+1;$i++) {
   
3.         $gi{$gikey[$i]} = $givalues[$i];      
   
4. }
   

复制代码

emlin129

不行，调测了下，%gi 只有一个值   
for ($i=0,$i<$#gikey+1,$i++) {
       
         $gi{$gikey[$i]} = $givalue[$i];
}
       
while (my ($key1, $value1) = each(%gi)) {
print "$key1 => $value1\n";
}
   Gi2/2/4 => 0.73%

jason680

回复 2# emlin129

@gi{@gikey} = @givalues;   # for %gi
   

sunzhiguolu

回复 4# emlin129
使用 Jason680 大神提供的代码吧, 简洁高效!

   

emlin129

  回复 5# jason680

厉害啊，果然是高手，调试了下，搞定我的问题。不过我就是看不懂！先收藏慢慢学习中！
   

jason680

回复 7# emlin129

基础...

$ perldoc perldata
NAME
    perldata - Perl data types

DESCRIPTION
  Variable names
    Perl has three built-in data types: scalars, arrays of scalars, and
    associative arrays of scalars, known as "hashes". A scalar is a single
    string (of any size, limited only by the available memory), number, or a
    reference to something (which will be discussed in perlref). Normal arrays
    are ordered lists of scalars indexed by number, starting with 0. Hashes
    are unordered collections of scalar values indexed by their associated
    string key.
...

    Scalar values are always named with '$', even when referring to a scalar
    that is part of an array or a hash. The '$' symbol works semantically like
    the English word "the" in that it indicates a single value is expected.

        $days               # the simple scalar value "days"
        $days[28]           # the 29th element of array @days
        $days{'Feb'}        # the 'Feb' value from hash %days
        $#days              # the last index of array @days

    Entire arrays (and slices of arrays and hashes) are denoted by '@', which
    works much as the word "these" or "those" does in English, in that it
    indicates multiple values are expected.

        @days               # ($days[0], $days[1],... $days[n])
        @days[3,4,5]        # same as ($days[3],$days[4],$days[5])
        @days{'a','c'}      # same as ($days{'a'},$days{'c'})


   

sunzhiguolu

回复 4# emlin129
我这里测试没有问题, 提供一些测试数据我试下...

   

sunzhiguolu

回复 4# emlin129
回帖测试...