suchen und vergleichen - #32697 (Datenbanken und Verzeichnisdienste)

Relais

2005-01-07 12:58

User since
2003-08-06
2261 Artikel
ModeratorIn

Das muß geändert und um die Übergabe von "$daten_ref" ergänzt werden:[quote=Relais,23.12.2004, 11:16]Dann, wenn es um den Aufruf von doc_vorhanden() geht:

Code: (dl )

1
2
3

foreach my $identnr ( keys %$daten_ref ) {
    doc_vorhanden( $identnr, keys %{ $daten_ref->{$identnr} } );
}

[/quote]
Neu:

Code: (dl )

1
2
3

foreach my $identnr ( keys %$daten_ref ) {
    doc_vorhanden( $identnr, $daten_ref, keys %{ $daten_ref->{$identnr} } );
}

Und dieses ebenfalls:

Quote
Dann in doc_vorhanden():
Code: (dl )
1
2
3
4
sub doc_vorhanden {
    my ( $identnr, @docnames ) = @_;

...

Neu:

Code: (dl )

sub doc_vorhanden {
    my ( $identnr, $daten_ref, @docnames ) = @_;

...

Erst denken, dann posten --
27. Deutscher Perl- u. Raku -Workshop 12. bis 14. Mai 2025 in München.

Winter is Coming