请教：

以一个变量为数组名，并向该数组中写数据，如何写perl程序？

例如：
$arrayprefix = "server";
$i = 1;
我现在要向数组server1中写数据，数组名是变量$arrayprefix和变量$i组合而成，请问如何向该数组写数据？