{
    $OUT .= '';
    foreach my $alias ( $a->users, $a->groups, $a->pseudonyms, $a->get_all_by_prop(type =>"system") ){
        next unless ( $alias->prop('Visible') || '') =~ m/^(internal|none)$/i;

	$OUT .= $alias->key . "\n" and next if $alias->key =~ m/@/;

        foreach my $domain ( $d->domains ){
            $OUT .= $alias->key . '@' . $domain->key . "\n";
        }
    }
}
