关联数组是Perl语言所特有的，它提供了些函数用于简化对关联数组的操作，常用的函数说明如下。

 

一、keys函数

keys函数可返回关联数组的键值，其格式为：

@list -keys (%assoc_array);

它把关联数组%assoc_anay的所有键值赋予数组@list，比如：

ojoanay-(l,“Jan”,2,“Feb”),

@list=keys(%array)，

将使得@lisl=(l，2)。

 

二、values函数

values函数用来将关联数组的元素值用普通数组的形式返回，其格式为

@list= values(%assoc_array);

它取出关联数组%cassoc_array中全部的元素并赋予@list。比如：

%array-(l,“Jan”,2,”Feb”):

@list= values (070array);

将使得@list数组为(”Jan“，”Feb”)，但其中元素的顺序是不定的。

 

三．each函数

each函数用于处理关联数组中的每一个元素，其格式为：

@pair= each(070assoc_array);

它返回关联数组%assoc_array-和的键值和相应元素的别表对（即下标和相应的值），其中元素的顺序是不定的。当关联数组为空时，返回空列表。

 

四、delete函数

delete函数用于删除关联数组中的元素，其格式为：

$iLcm= delete ($assoUway{$key）;

它将删除关联数组assoc_array中键值为$key的元素，并将它作为返回值。比如：

%carray =(1.“Jan”,2,”Feb”）:

$item= delete ($array{I}),

将使得$item为"Jan"。