-# $Id: ZOOM.pod,v 1.33 2006-04-11 16:40:08 mike Exp $
+# $Id: ZOOM.pod,v 1.34 2006-04-12 08:49:20 mike Exp $
use strict;
use warnings;
=back
Here is a very short program (omitting all error-checking!) which
-demonstrates this process. It parallel-searches two servers (or more
+demonstrates this process. It parallel-searches three servers (or more
of you add them the list), displaying the first record in the
result-set of each server as soon as it becomes available.
use ZOOM;
@servers = ('z3950.loc.gov:7090/Voyager',
- 'bagel.indexdata.com:210/gils');
+ 'bagel.indexdata.com:210/gils',
+ 'agricola.nal.usda.gov:7190/Voyager');
for ($i = 0; $i < @servers; $i++) {
$z[$i] = new ZOOM::Connection($servers[$i], 0,
async => 1, # asynchronous mode