nsqry($domain, @{$AoH{$key}} ) ; #### my $nssvr = shift @_ ; my $client = shift @_ ; #### my $nssvr = shift @_ ; my @clients = @_ ; #### for my $client ( @clients ) { ... }
## my $nssvr = shift @_ ; my $client = shift @_ ; ##
## my $nssvr = shift @_ ; my @clients = @_ ; ##
## for my $client ( @clients ) { ... }