use Data::Dumper; print Dumper $Struktur;