#!/usr/bin/perl
my @array;
$array[0]{'key'} = "testline";
$item = \$array[0];
$array[0]{'key2'} = "testline2";