Update of /cvsroot/monetdb/clients/src/perl
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv2145/clients/src/perl
Added Files:
mclient.pl
Removed Files:
MapiClient.pl
Log Message:
With a complete feature release of all MonetDB related packages ahead,
there is no need any more to keep the old "MapiClient" next to the new "mclient"
for back-ward compatibility.
To clean-up the code base, we rename all relevant remaining occurances
of "MapiClient" into "mclient" and remove redundant copies,
trying to maintain/achieve consistency with minimal code changes
and minimal file renaming.
Still to do: the ./NT/ directories;
Sjoerd agreed on taking care of them.
--- NEW FILE: mclient.pl ---
#!/usr/bin/env perl
# The contents of this file are subject to the MonetDB Public License
# Version 1.1 (the "License"); you may not use this file except in
# compliance with the License. You may obtain a copy of the License at
# http://monetdb.cwi.nl/Legal/MonetDBLicense-1.1.html
#
# Software distributed under the License is distributed on an "AS IS"
# basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the
# License for the specific language governing rights and limitations
# under the License.
#
# The Original Code is the MonetDB Database System.
#
# The Initial Developer of the Original Code is CWI.
# Portions created by CWI are Copyright (C) 1997-2007 CWI.
# All Rights Reserved.
use Mapi;
my ($monet, $line);
$monet = new Mapi('localhost', 50000, 'monetdb', 'monetdb', 'sql', '', 0);
print "> ";
while ( !(($line=<>) =~ /\q/) ){
my $res = 0;
$monet->doRequest($line);
while( ($res = $monet->getReply()) > 0 ) {
print $monet->{row} . "\n";
}
if ($res < 0) {
if ($res == -1) {
print $monet->{errstr};
} elsif ($res == -2) {
print "$monet->{count} rows affected\n";
}
}
print "> ";
}
$monet->disconnect();
1;
--- MapiClient.pl DELETED ---
-------------------------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc.
Still grepping through log files to find problems? Stop.
Now Search log events and configuration files using AJAX and a browser.
Download your FREE copy of Splunk now >> http://get.splunk.com/
_______________________________________________
Monetdb-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-checkins
