Select Code to Download

$oZ3950 = Win32::OLE->new('VBZOOMC.ZoomFactory');
$oConnection = $oZ3950->CreateZoomConnection( 'z3950.loc.gov', 7090 )
  or die "CreateZoomConnection failed!\n";
$oConnection->SetOption( 'databaseName',          'Voyager' );
$oConnection->SetOption( 'preferredRecordSyntax', 'USmarc' );

#!/perl/bin/perl
#
...
9780201489460
9780764545696
9780138482763