my %items = map {$_ => 1} @$arr; # Zeile 1594