10 use FROGS::Config qw($conf);
12 $::conf->{-DEBUG} = 2;
14 # $::conf->{-DEBUG} = 2;
16 my $db = new DataBase();
25 my $command = BUILD_ARK->new($dbhash,$db);
27 print $command->first_phase_ajax()."\n";
33 #$db->update_hash('MOBILE',
35 # {'COUNT' => 'COUNT + 1'},'noquote');
39 # print $db->relative("2004-05-13 03:40:37") ."\n";
41 #my $aym = new Aymargeddon(1,3,$db,'DE');
43 #print $aym->show_statistic();
45 # print $aym->read_single_relation(1,2). "\n";
47 #print "place is: $place.\n";
49 # print Dumper $::conf;
52 #my $d = DataBase->new();