my @ways4track = (); for my $ele_way (@data){ .... my @element_data = ($ele_way, $way_firstnode, $way_lastnode); .... push(@ways4track,\@element_data); } .... }#end-for - ele_way # warum sei es darum... my @ways4track2analyze = @ways4track; # das mal so zum anzeigen - ist ok! foreach my $way_data (@ways4track2analyze){ print "0-ID... ".$way_data->[0]->id()."\n"; print "1... ".$way_data->[1]."\n"; print "2... ".$way_data->[2]."\n"; #foreach my $way_parameter (@$way_data){ # print $way_parameter."\n"; #} }