use ZOOM;
$conn = new ZOOM::Connection('z3950.loc.gov', 7090,
                   databaseName => "Voyager",
                   preferredRecordSyntax => "USMARC");
$rs = $conn->search_pqf('@attr 1=7 0253333490');

$rec = $rs->record(0);
print $rec->render();