projects
/
aymargeddon
/
current.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
some bugs with json fixed
[aymargeddon/current.git]
/
src
/
test2.pl
diff --git
a/src/test2.pl
b/src/test2.pl
index
9197c44
..
db1df36
100755
(executable)
--- a/
src/test2.pl
+++ b/
src/test2.pl
@@
-2,6
+2,8
@@
use strict;
use FROGS::DataBase;
use Data::Dumper;
use Aymargeddon;
use FROGS::DataBase;
use Data::Dumper;
use Aymargeddon;
+use AymCommand;
+use FROGS::Command;
$| = 1;
$| = 1;
@@
-13,11
+15,26
@@
$::conf->{-DEBUG} = 2;
my $db = new DataBase();
my $db = new DataBase();
-$db->update_hash('MOBILE',
- "LOCATION=0_1",
- {'COUNT' => 'COUNT + 1'},'noquote');
+my $dbhash = {
+ "PLAYER" => 5,
+ "GAME" => 1,
+ "ID" => 2,
+ "LOCATION" => "2_0",
+};
-$db->commit();
+my $command = BUILD_ARK->new($dbhash,$db);
+
+print $command->first_phase_ajax()."\n";
+
+
+
+
+
+#$db->update_hash('MOBILE',
+# "LOCATION=0_1",
+# {'COUNT' => 'COUNT + 1'},'noquote');
+
+#$db->commit();
# print $db->relative("2004-05-13 03:40:37") ."\n";
# print $db->relative("2004-05-13 03:40:37") ."\n";