Parent Directory | Revision Log | Patch
revision 35 by dpavlin, Tue Sep 9 13:24:15 2008 UTC | revision 36 by dpavlin, Sun Sep 21 14:24:22 2008 UTC | |
---|---|---|
# | Line 16 tcqdb.pl - example from documentation tr | Line 16 tcqdb.pl - example from documentation tr |
16 | my $qdb = tcqdbnew(); | my $qdb = tcqdbnew(); |
17 | ||
18 | # open the database | # open the database |
19 | if (!tcqdbopen($qdb, "casket", QDBOWRITER | QDBOCREAT)) { | if (!tcqdbopen($qdb, "casket-qdb", QDBOWRITER | QDBOCREAT)) { |
20 | my $ecode = tcqdbecode($qdb); | my $ecode = tcqdbecode($qdb); |
21 | die "open error: ", tcqdberrmsg($ecode); | die "open error: ", tcqdberrmsg($ecode); |
22 | } | } |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |