X-Git-Url: http://lists.indexdata.dk/cgi-bin?a=blobdiff_plain;f=samples%2Fzoom%2Ftrivial-async.pl;h=1f588be26afbc2863d7b2bec65690c7a351a3174;hb=240063c187d8f615646214c76a3c920de7d05bb4;hp=9a165f4fd4c60083d1a8b0062cc7d2d803376dfa;hpb=402083a162a0cab5481d44cb1d63d820dae85f4c;p=ZOOM-Perl-moved-to-github.git diff --git a/samples/zoom/trivial-async.pl b/samples/zoom/trivial-async.pl index 9a165f4..1f588be 100644 --- a/samples/zoom/trivial-async.pl +++ b/samples/zoom/trivial-async.pl @@ -1,6 +1,7 @@ use ZOOM; @servers = ('z3950.loc.gov:7090/Voyager', - 'bagel.indexdata.com:210/gils'); + 'z3950.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