perl ：在数组@array中增加新的元素有几种方法？请详细一一列出，谢谢！

push 新元素加在最后

unshift 新元素加在最前

$array[$#array] = newvalue 直接赋值新增最后一个元素

@array = (newvalue1,@array,newvalue2) 直接赋值在最前和最后新增元素(可多加)

%adusers 是hash，$sam是这个hash的key，整个$adusers{$sam}可以看做一个变量，相当于hash的value，所以这句话的意思是把$user这个变量赋给以$sam为key的hash%adusers的value

声明hash是用%'hash的名称'，调用hash的value是用$'hash的名称'{key}。

如果是将这一行插入到数组的最后一个单元中，直接使用push(@array,'值')，就可以了；

看你上面的内容应该是将不同的单词放到数组的不同单元中，且提供的内容“MagnoliophytaEricalesActinidiaceaeActinidia”是以半角“”做为分隔的，那么使用@array=split(//,'MagnoliophytaEricalesActinidiaceaeActinidia')就可以了；

例如（本例中用空格做为分隔）：

my $crt="MagnoliophytaEricalesActinidiaceaeActinidia"

my @array=split(/\s/,$crt)

结果：

@array[0]='Magnoliophyta'

@array[1]='Ericales'

@array[2]='Actinidiaceae'

@array[3]='Actinidia'

---