Question

perl数组推到哈希中

假如一个数组是这样的
aaaa,vbbbbb
ccccc,ddddd
eeeee,xxxxx
就是这样两列逗号间隔的，如何让第一列是keys 第二列是value

Answer 1

你的问题交代的不是很清楚, 是否数组每个元素都是类似"aaaa,vbbbbb"这样的可以以逗号分隔的两部分?

按照这么理解的话,你可以参考下面的代码, 测试过了.

use strict;
my @array = ("aaa,vbbbb","cccc,ddddd","eeeee,xxxxx");
my %hash_output;
#数组每个元素按","分开,并按HASH表存储
for(@array)
{
	my ($key,$value) = split ',';
	$hash_output{$key} = $value;
}
#检查hash表的最终值
for(keys %hash_output)
{
	print "[key] $_ ==> [value] $hash_output{$_}\r\n";
}