%list = $data_structure_reference->{data1};

##</code><code>##

%list = %{ $data_structure_reference->{data1} };

##</code><code>##

$pfm->finish( 0, { data1 => %id,

##</code><code>##

$pfm->finish( 0, { data1 => \%id,