foreach my $dfs (@defstream) {
    $d{$dfs} = 1;
}